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ABSTRACT 


CP/m-96  is  a  microcomputer  (INTEL  90S 6)  operating  system 
developed  and  marketed  by  Digital  Researcn.  Tne  operating 
system  is  designed  so  taat  a  user  can  adapt  tne  system  to 
Ms  own  input/output  hardware  devices.  This  tresis  develops 
interfaces  to  two  floppy  disx  controllers,  tne  iSSC  2P1 
(single  density)  and  tne  iSBC  2*2  (double  density' 
controllers.  Tne  interface  includes  tne  writing  of  a  boot 
loader  embedded  in  tne  iSBC  9b?  Execution  Venicie  Monitor, 
the  monitor  system  for  the  INTEL  iSBC  S6/12  single  board 
computer.  Also  included  is  an  interface  module  for  tne  cold 
start  loader  (loader  RIOS)  and  an  input  and  output 
Interface,  BIOS.  A  design  for  tne  interface  module  of 
typical  systems  based  on  Winchester  technology  hard  disics  is 
also  presented. 
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I.  INTRODUCTION 


A.  PURPOSE  OF  THIS  THESIS 

Tne  adaptation  of  CP/M-H6  to  tns  Hardware  described 
nerein  was  ur.dertaKen  to  provide  an  operating  systen  for 
bk:y6  processor  based  single  board  computers  at  tne  Naval 
Postgraduate  Scnooi.  Tnis  operating  system  will  support 
software  development  and  system  emulation  for  tne  AEGIS 
modeling  project.  Tne  software  will  oe  available  for  general 
use  at  NPS.  In  addition  tne  experience  of  modifying  an 
operating  system  provided  tne  autnor  witn  an  opportunity  to 
learn  about  microcomputer  Hardware  and  microcomnuter 
operating  systems. 

3.  HISTORY  OF  MICROCOMPUTER  OPERATING  SYSTEMS 

Tnis  is  a  brief  overview  of  tne  nlstory  of  microcomputer 
operating  systems  summarized  from  Ref.  1.  It  is  necessarily 
brief  as  tne  advent  of  microcomputer  operating  systems  is 
itself  ratner  recent.  Microcomputers  came  of  age  witn  tne 
construction  of  tne  entire  central  processor  on  one  cnip, 
tne  replacement  of  core  memory  witn  inexpensive  mass 
produced  semiconductor  memory,  tne  availability  of  tne 
floppy  diSK  and  tne  standardization  of  dissett®  format.  At 
first,  tne  primary  applications  of  microcomputers  were  in 
real-time  control  systems  sucft  as  macnine  controlled  tools. 
In  sucn  applications,  process  management  is  tne  main  tnrust 


and  system  I/O  Is  negiigiDle.  Tms  required  a  simple, 
-'ustcmized  operating  system.  Tne  first  rni"rc''o^put°r 
operating  systems,  more  properly  caned  executive  systems, 
were  for  real  time  applications.  As  microcomputer  systems 
cecame  less  expensive,  it  tecame  oossicie  to  devote  a  system 
to  a  single  user  as  a  program  development  tool.  Tr.is  use 
presented  tne  need  for  nigr.er  level  language  support,  wnim 
meant  that  an  operating  system  had  to  interface  one  or  more 
orosrammi ng  ianguage(s)  to  tne  Hardware.  Several 
^icrocomnute  r  manufacturers  nave  prolu'-ei  their  own 
operating  systems.  Tnese  operating  systems  are  specifically 
designed  for  a  "computer  system”  and  are  generally  not  user 
con  f  igura  Die  . 

Online  tne  large,  powerful  operating  systems  four.a  ir. 
mainframe  and  large  minicomputer  tiresnarin?  systems, 
microcomputer  operating  systems  are  relatively  austere  ar.d 
simple.  One  of  tne  primary  reasons  for  tnis  difference  is 
that  a  microcomputer  is  usually  a  single  user  system  (with 
some  exceptions).  As  a  result,  tne  operating:  system  does  not 
need  to  provide  features  sucn  as  memory  protection,  process 
scheduling  and  tine  sharing  of  tne  CPU(s).  .besides  the 
simpler  Interface  required  of  a  mi crccomDU ter  operating 
system,  the  operating  system  and  tne  applications  programs 
must  function  in  a  snail  amount  of  primary  storage, 
typically  Detween  lbK  and  b4K,  as  compared  to  several 
megacytes  in  tne  large  mainframes.  Even  tnougn  relatively 


small  and  simple,  a  microcomputer  operating  system  must 
still  provide  file  management,  process  management  and  I/O 
managemen  t . 

Two  representative  microcomputer  operating  systems  are 
InTEL's  ISIS-II  and  Digital  Researcn's  CP/T-Btf.  To  operate 
under  ISIS,  tne  user  requires  a  minimum  of  62%  of  primary 
storage.  Tne  CP/y  user  requires  a  minimum  of  16E.  Botn 
orovide  tne  basic  functions  required  of  an  operating  system. 
ISIS,  nowever,  will  only  run  on  an  INTEL  computer  system 


configuration 

and 

is 

no  t 

user  modifyaoi 

e.  CP/M-Btf  is 

designed  to  run 
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system  after 
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program  module 

containing  tne 

nardware 

dependencies.  Tnis 

factor  aior.e 

mates  CP/*!  poouiar  and  nas  resulted.  in  tne  production  of 
many  CP/i*  compatible  utility  and  application  programs  cy 
otner  companies.  ISIS  nas  some  features  beyond  tnose  of  C P / v 
in  tne  area  of  development  software  for  INTEL  nardware. 
CP/'I's  dynamic  debugger  (DDT),  nowever,  is  more  powerful  ar.d 
easier  to  use  tnan  INTEL'S  ICE  system.  Botn  ISIS  and  CP'Y 
support  essentially  tne  same  file  coerations.  Currently, 
because  of  its  flexibility,  C?/y  is  tne  most  widely  used 
microcomputer  operating  system. 

yuiti-user  systems  sucn  as  vp/.M  and  microcomputer 
networK  systems  sucn  as  CP/NET  (botn  produced  by  Digital 
Researcn),  are  now  available. 


C.  ADAPTATION  TO  THE  USER'S  ENVIRONMENT 

Digital  Research  nas  attempted  to  maice  tneir  CP/V’ 
operating  systems  as  flexible,  in  terms  of  narawar=  suite, 
as  possiole.  Tr.e  met  Pol  used  is  mom  la  r  programming.  Tr.e 
user  interface,  tne  Console  Commune:  Processor  fCOP)  nas  no 
hardware  dependencies  otner  tr.an  tne  Cr'J.  Tne  file 
management  system,  tne  Basic  Eiss  Operating  System  <  BUGS', 
is  also  independent  of  hardware.  Botn  tne  CCP  and  tre  EPOS 
are  interfaces,  to  tne  Basic  Input/Output  System  fBIOS) 
through  logical  I/O  devices  and  logical  lisK  devices.  Tne 
BIOS,  men,  contains  tne  logical  device  to  p.nysicai  device 
translation  routines.  Adaptation  of  tne  operating  system  to 
a  unique  environment  requires  only  tne  modification  of  tne 
appropriate  EIOS  routines,  greatly  simplifying  tne 
alteration  process. 

Qn^e  one  nas  successfully  completed  one  adaptation, 
foilov-on  adaptations  will  oe  muen  easier  to  acmeve  as  an 
understanding  of  the  operating  system  and  its  interface 
procedures  Is  developed  along  witn  a  Detter  understanding  of 
microcomputer  arcnitecture  in  general. 

E.  ORGANIZATION  OF  THIS  THESIS 

Tnis  taesis  is  organized  as  a  cluepnnt  for  alteration 
of  tne  CP/M-H5  operating  system  to  any  specific  hardware 
configuration.  Tnis  metnoioiogy  win  also  serve,  at  least  m 
general,  for  tne  alteration  of  any  operating 


or  1  ef 


sys  tem-to-r.a  rdware  interface.  Cnapter  l  is  a 
introduction  to  microcomput er  operating  systems  in  general 
ana  tne  noai r i cat  ion  of  tne  CP/M-bb  operating  system  m 
oarticuiar.  Chapter  i  reflects  the  investigation  of  tne 
candidate  operating  system  in  order  to  understand  now  to 
adapt  it  to  tne  existing  hardware.  Chapter  6  is  a  summary  of 
tne  study  of  tne  typical  floppy  distc  or  Winchester 
technology  iiss  ana  a  ioof  at  possible  hardware  '-anaidates . 
Cnapter  4  covers  tne  adaptation  of  tne  I/O  interface  module 
(blOS )  and  tne  bootstrap  program  for  these  versions  of  the 
operating  system.  Cnapter  5  discusses  some  of  tne 
difficulties  encountered  and  a  plan  for  adapting  CP/'i-sb  to 
a  nard  distc.  Tne  appendices  contain  tne  programs  developed 
as  part  of  thesis  and  one  of  tne  programs  which  was  used  as 
a  model. 
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II.  STRUCTURE  OF  CP/M-=S 


a.  o  v  v  o  i  a#r 

CF/w-=o  is  a  microcomputer  operating  system  Mr  I  Mil 
CORPORATION'S  3/36  processor  cased  'Microcomputers.  It  is  tee 
logical  successor  to  CP/Y-RZ ,  a  similar  operating  system 
developed  and  marieted  cy  Digital  P.esearon  for  tne  1NTFL 
d/bO  processor.  File  compatioiii  ty  nas  oeen  preserved  *itn 
an  previous  versions  of  CP/Y.  C?/Y  provides  a  general 
environment  for  program  construction ,  storage,  editing, 
execution  and  aeeugging.  Tne  file  structure  of  version  of 
CF/Y-62  is  usel,  allowing  as  many  as  sixteen  drives  witn  up 
to  eignt  meeatytes  on  eacn  drive. 

CP/^-36  offers  euilt-in  utility  commands,  system 
transient  commands  and  tne  capaciiity  of  executing  user 
defined  transient  commands  (programs).  Among  tne  system 
transient  programs  are  an  Intel  compaticie  assemoier  'ASvb6 ) 
and  a  dynamic  ma mine  language  program  ascugger  (TDT).  T.dey 
are  aescrlDed  in  detail  in  Digital  Researcn's  puciicatior.s 
[Ref.  2}  and  l?.ef,  respectively. 

A  powerful  feature  of  CP/M  is  its  modularity.  One  of  tne 
taree  modules  of  tne  operating  system,  tne  Basic  I/O  System 
OIOS),  defines  tne  nardware  environment  for  tne  system.  As 
a  result  or  tnis  modularity,  CP/Y-bb  can  De  modified  to  run 
on  any  b/bb/3/by  processor  cased,  single  processor  computer 
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system  by  merely  changing  tne  BIOS.  A  more  detailed 
description  of  CP/M  am  its  features  is  contained  in  Digital 
P.esearcn 's  publications  [Ref.  4],  l?.ef.  5J  and  IRer.  sj  . 


3.  ORGANIZATION  OP  CP/V-BS 

Tbe  sources  of  CP/M-eb  information  for  tnis  paper  are 
[Ref.  4J  ,  [P.ef.  5J  and  [Ref.  Sj  .  Tnis  cnapter  freely 
summarizes  tne  relevant  material  to  tnis  tnesis. 

Tne  operating  system  is  contained  In  file  "CPM.SYS”. 
"CPM.SfS"  contains  tnree  program  modules:  tne  Console 
Command  Processor  (CCP),  tne  Basic  Disi  Operating  System 
(EDOS),  and  tne  user-coni' ieura  bie  Basic  Input/Output  System 
(BIOS).  Tnis  modularity  allows  tne  CCP  and  EDOS  to  ce 
independent  of  tne  hardware  in  wnicn  tne  system  is 
implemented. 

The  CCP  is  tne  system's  interface  to  tae  user's  console. 
It  translates  tne  user's  commands  into  CP/M  system  cans  in 
order  to  carry  out  tne  desired  action.  Tne  EDOS  module 
provides  ail  tne  dissr  and  file  management.  Tne  BIOS  contains 
all  tae  nardware  dependent  features  and  interfaces.  Tne 
operating  system  executes  in  any  portion  of  memory  above  tne 
interrupt  locations,  waile  tne  remainder  of  tne  address 
space  is  partitioned  into  as  many  as  sient  non-con tiguous 
regions,  as  defined  in  a  table  in  tne  BIOS. 

CP/M-S6  is  too  large  a  program  to  fit  in  tne  first  two 
(system)  traces  of  a  diskette.  As  a  result  tne  boot  loader 
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loads  Into  memory  a  cold  start  loader,  called  "LOADER .  CME’’ , 
from  tee  first  two  tracis.  Toe  boot  loader  maxes  tee 
appropriate  initializations  ana  tnen  transfers  program 
control  to  tne  cold  start  loader.  Tne  cold  start  loader, 
wnicn  is  essentially  a  subset  of  “CPM.SYS”,  finds  "CPM.SYS” 
on  tne  system  disx,  loads  it  into  memory,  maxes  tne  proper 
initializations,  and  finally  transfers  control  to  tne 
operating  system. 

C.  CCP  fUILT-IN  *  TRANSIENT  COMMANDS 

Tne  operation  of  CP/M-8S  is  similar  to  tnat  of  CP/M-Bx. 
Upon  cold  start  tne  operating  systen  signs  on  and  drive  A  is 
logged-in,  CP/M-B6  tnen  waits  for  an  input  command  line. 
There  are  five  built  in  commands: 

DIP  -  displays  tne  directory  of  tne  designated  drive 

E3A  -  erases  tne  specified  directory  entry  on  tne 
designated  drive 

REN  -  renames  tne  designated  file 

TYPE  -  tynes  tne  designated  file  to  tne  logical  console 
le vi ce 

USER  -  cnanges  user  directories  in  muiti-lirec tory 
systems 

Also  tne  command  line  mav  begin  witn  tne  name  of  a 
transient  program  witn  tne  assumed  file  type  of  CMC.  CMD 
stands  for  "command  file”  and  is  used  to  differentiate 
CP/M-£t>  transient  command  flies  from  COM  files  under  CP/M-BO 
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wmcn  serve  tne  same  purpose.  Transient  programs  are  loaaea 
Into  memory  in  tne  Transient  Program  Area(s)  (TPA),  as 
defined  in  tne  JSIQS,  in  stac.<  orie~. 

CP/M-Bb  supports  programs  written  ir.  tnree  memory 
models:  tne  Bfc‘90  moiei,  tne  Small  model  and  tne  Compact 
model. 

Tne  80S0  model  supports  programs  wnicn  are  directly 
translated  from  CP/^-BK  wnen  code  and  data  areas  are 
intermixed.  Tne  model  consists  only  of  a  code  group  wrier, 
in  turn,  is  normally  a  single  segment  of  b4£  or  less.  Tne 
operating  system  and  tne  "■old  start  loader  are  written  in 
tne  moiei. 

Tne  Smail  model  supports  programs  wr.ere  mere  is  a 
separate  '•ode  and  data  group.  Normally  tne  Small  model 
programs  are  b4.K  or  less. 

Tne  Compact  model  occurs  wnen  any  of  tne  extra,  stactc  or 
auxiliary  groups  are  present  in  tne  program.  Sacn  group  may 
consist  of  one  or  more  segments. 

Tne  tnree  models  differ  primarily  in  tne  manner  in  wmen 
tne  segment  registers  are  initialized  upon  transient  program 
loading.  Tne  operating  system's  program  ioaa  function 
determines  tne  memory  monel  used  Dy  tne  transient  ore gram  ny 
examining  tne  program  group  used.  All  tnree  models  are 
discussed  in  more  detail  ir.  tne  next  section. 
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Transient  Program  Fxe~utio 


"odel  a 


Tne  initial  values  or  tne  serene  registers  are 
iet°rTinei  cy  in?  ""emory  nonei"  of  tne  transient  program 
and  are  described  in  tne  CV'D  flis  .reader  generated  ty  tne 
program  “SSNC^D.CMD”  cr  ”GENCVE .COr” .  Tne  tr.ree  models  are 
depicted  m  Figure  1. 


!  b?b4.’  yodel  ! 

Code  and  C  a  t  a  Croups  Overlap  ' 

!  Small  yodel  ! 

Independent  Code  S  Jlata  Croups  ! 

!  Compact  Moaei 

!  Tnree  or  yore  Independent  Group*  ! 

Figure  1  Transient  Program  memory  voaeis. 
a.  Tda  Stiee  'dole! 

Tne  30a45  Yolei  is  assured  wnen  tne  transient 
program  contains  only  a  code  ?rou?  (containing  ootr.  code  and 
data).  In  sucn  oases,  tne  C5,  DS  ana  SS  registers  are  an 
initialized  to  tne  Beginning  of  tne  cote  3-roup,  w.iile  in*3  SS 
and  S?  registers  remain  set  to  a  9t'-cyte  stacic  area  in  tne 
CCF.  Tne  Instruction  Pointer  (IP)  is  set  to  10? H,  similar  to 
TP/M-30.  Tne  intermixed  coae  and  data  regions  are 
indlstinguisnaoie .  Tnls  modei  allows  simple  translation  of 
eZetf,  baba  and  Zb?  coae  into  tne  rfc.be>  ana  b?bb  environment. 
Following  program  load,  tne  fcfc'bi)  ycdei  appears  as  lr.  Figure 
i i,  wnere  low  addresses  are  snowr  at  tne  top  of  tne  diagram. 

19 


■verm: 


cc? 


S5  *  5 P  : 

CS,  DS,  ES :  - 
CS  +  MickZ  ! 


ta  «e 
page 


:s  +  !  if  =  ! 

!  cofls  ! 


data 


i 


code 

data 


Figure  2  Tne  fct'fc’ti  Merory  Model. 


p.  Tne  Snail  yoaei 

Tne  Snail  Moiei  is  assured  wnsa  me  transient 
program  uses  cotn  a  coae  ana  data  group.  {In  ASyf 5 ,  ail  cone 
is  generate!  following  a  CS2G  directive,  mile  data  is 
defined  following  a  DSEG  directive.)  In  mis  case  7S  is  set 
tc  me  fee  Pinning’  of  me  code  pro  up,  tne  cs  and  ES  re^iste^s 
are  set  to  tne  start  of  tne  lata  eroup,  ana  tne  SS  ana  r? 


registers  retrain  i 
Figure  3. 


me  CCP's  area  as  s.no»n  prapni "a i l.v 


! 


5  3  : 


CC? 

Stac-c 


35  +  5F : 


05  ,  £5: 


DS  +  01<}UE : 


Figure  3  Tne  Small  Memory  mdel. 


c.  Tne  Compact  r^oaei 

Tne  Compact  Modei  is  assumed  waen  separate  code 
am  lata  groups  are  present,  along  witn  one  or  more  of  tne 
remaining  groups.  In  t n is  case,  tne  OS,  DS  am  SS  registers 
are  initialize!  to  tne  base  address  of  tneir  respective 
areas.  Tie  S5  am  5F  registers  remain  in  tr.e  CCF  area.  If 
tne  user  intends  to  use  tne  stacsc  group  as  a  stacc  area,  tr.e 
transient  program  must  set  tne  55  and  5P  registers  upon 
entry.  Tne  initial  configuration  of  tne  segment  registers  in 
tnis  moiei  is  snovn  in  Figure  4. 
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i  cc? 


!  StacK 

SS  -  SP: 


CS : 

CS  : 

DS  +  01i37H: 
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I?  =  e-tuvd 
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c  ode 

! 

1 

* 

Dase 

1 

; 

paee 
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j  i 

!  data  ! 

*  i 

; 

! 

j 

data 

I 
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Figure  4  Tne  Compact  memory  Noasi. 


The  values  of  tne  various  segment  registers  can 
oe  pro^ranna ti cal iy  cnanged  luring  execution  oy  cnanging  tne 
values  in  tne  tase  page  as  descrited  in  tne  preliminary 
documentation,  tnus  allowing  access  to  tne  entire  memory 


SDace. 


2.  Transient  Proeram  Setun  And  Termination 


Similar  to  CP/M-SS3,  tne  CCP  parses  up  to  two  file 
names  following  tne  command  and  places  the  properly 
formatted  File  Control  Blocks  (FCB's)  at  locations  £Z<55CH 


and  i!5J6CH  in  tne  case  page  relative  to  tne  DS  register. 
Under  CP/M-Btf,  tne  default  DMA  (direct  memory  access) 
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address  is  initialize!  to  in  tne  oase  page,  Due  to  me 
segmented  memory  or  tne  btfbg  ana  bebb  processors,  tne  DMA 
address  is  iiviaei  into  two  parts:  tne  Df-’A  segment  acaress 
and  tne  DMA  offset.  Also,  under  CP/M--6,  tne  default  DVA 
case  is  set  to  tne  value  of  DS,  and  tne  default  DVA  offset 
is  initialized  to  i?  fc*  B  e  F .  Tnu$,  C?/w-be  ana  CP/M--5  operate 
in  tne  sane  way  in  tnat  tney  oot.n  assume  tne  default  DVA 
address  is  tne  second  naif  of  tne  case  page. 

Tne  CCP  transfers  control  to  tne  transient  program 
tnrougn  an  9066  "Far  Call."  In  ali  but  one  case  of  tne 
Compact  Model,  tne  transient  program  may  cnoose  to  use  tne 
96-byte  CCP  stacsc,  and  optionally  return  directly  to  tne  CCP 
upon  program  termination  by  executing  a  "Far  Return." 
Programmatic  termination  also  occurs  wnen  3D0S  function  zero 
is  executed.  The  operator  may  terminate  program  execution  by 
tvping  a  single  CQNTROL-C  during  line  edited  input.  Tnis  nas 
tne  same  effect  as  programmatic  execution  of  SDOS  function 
zero.  Contrary  to  tne  operation  of  CP/M-Be,  no  disx  reset 
occurs  and  tne  CCP  and  BDOS  modules  are  not  reloaded  from 
tne  disi  upon  program  termination.  In  snort,  for  tne  user 
familiar  witn  CP/M -60,  tne  CP/M-85  environment  is  very 
similar,  cut  more  powerful. 

D.  EDOS  SUMMARY 

Entry  into  tne  EDOS  is  made  tnrougn  tne  ~£be  software 
interrupt  *  224.  Tne  BOOS  is,  essentially,  a  set  of  59 
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functions  of  tnree  oaslc  types;  simple  functions,  fiie 
operations  ani  erteniei  operations.  Tne  interface  convention 
for  BDOS  calls  requires  tnat  function  cone  oe  passec  in 
register  CL  wit n  parameters  passed  in  re ei star  El  cr  EX 
depending  on  wnetner  it  is  a  oyte  or  word  value.  Byte  values 
are  returned  in  tne  AL  register  ana  word  values  in  registers 
\X  and  BX.  Taole  1  oeiov,  fror  Reference  5,  summarizes  t.cese 
conventions.  A  full  description  or  eacn  BDOS  function  is 
given  in  [P.ef  .6 ]  . 


!  BDQS  Entry  Registers  !  !  BDOS  Return  Registers  ! 


!  CX  Function  Code  ! 
!  DL  Byte  parameter  ! 
!  CX  Word  Parameter  ! 
!  DS  Data  Segment  f 
;  ; 


!  AL  Byte  Value  ' 
!  AX  Word  Value  ! 
!  £X  Word  Value  ! 
f  £X  Doutle  Word  Offset  1 
!  ii’S  Segment  Address  ! 


Tacle  1  BDOS  Parameter  Conventions. 


E.  BIOS  SUMMARY 

Tne  BIOS  is  loaded  into  memory  just  acove  tne  CCP  ar.d 
BDOS  modules  as  illustrated  in  Figure  5. 

Since  tne  BIOS  ray  te  configured  oy  tne  user,  it  r-ay 
vary  somewnat  in  iengtn.  Individual  routines  witnin  tne  PICS 
•nav  oe  at  different  memory  locations.  In  order  to 
standardize  tne  interface  to  tne  BIOS,  all  accesses  to  tne 
BIOS  are  male  tnrougn  tne  jump  vector  at  tne  cerir.ning  of 
tnat  module.  Tne  BIOS,  liKe  tne  BDCS,  also  uas  parameter 
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Figure  5  vemcry  Location  or  tne  PICS. 

oassine  conventions.  Parameters  for  routines  ir.  tr.e  2I3S  are 
passed  in  tne  Cl  register  ana  tne  EX  register  *nen  requirei. 
Byte  values  are  returned  in  tne  PL  register  am  word  vaiues 
in  PX. 

Tnere  are  tnree  major  types  or  routines  m  tne  BIOS: 
system  initialization/reinitialization,  simple  oraracter  I/O 
and  disic  I/O.  Ail  simple  cnaracter  I/O  operations  are 
assured  to  be  in  ASCII,  bot.n  upper  and  lower  case,  *itn  tre 
nign  orner  (parity)  bit  set  to  zero.  CP/!*  sees  ail 
peripneral  devices  as  "logical”  levices.  Translation  from 
logical  device  selection  to  pnysicai  device  assignment  is 
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in  Digital  Researcn's  publication  [Ref.  bj  .  Tne  RIGS  also 
contains  tne  Disk  Parameter  Taties  wnion  contain  tne 
description  of  tne  disK  drive  and  provide  a  scrat^rpai  area 
for  certain  3DOS  operations. 


Ill  .  INPUT/OUTPUT  DEVICES 

In  CF/'l-SS  the  CCP  and  BDOS  accomplish  ail  I/O  via  four 
logical  devices,  Tne  BIOS  assigns  whatever  pr.ysicai 
levices  are  in  tnat  particular  system  to  those  logical 
devices.  Tnis  napping  in  tne  BIOS  preserves  t.oe  independence 
of  tne  CCP  and  BEOS  frotr  tne  nardware  conf  i?ura  ticn. 

A.  LOGICAL  I/O  DEVICES 

CP/M-ab  addresses  four  logical  I/O  devices:  tne  console. 

lne  dev  ice  *  ^ne  Puacr.  device  aQd  ^ne  reacer.  Tne 

console  is  the  principal  interactive  peripneral  tnrousrh 
wmcn  tne  operating  svstem  communicates  witn  tne  operator. 
Tne  list  device  is  tne  principal  listing"  levies,  usually  a 
nardcopy  printer.  Tne  punen  device  is  tne  principal  tape 
punenine  device,  usually  a  ni?n-s?eel  paper  tape  pur.cn  or 
teletype.  Tne  reader  is  tne  principal  tape  reading  device. 
.V.nen  tne  "IOBIT.S"  function  is  implemented,  dyr.ani”  logical 
to  pnysical  device  mapping  may  oe  accomplished  as  assented 
in  Ref.  b. 

k ,  PHYSICAL  I/O  DEVICES 

The  CONIN,  CONOUT,  LISTOUT,  PUNCH  and  READER  routines  in 
the  BIOS  define  the  physical  interfaces  with  peripherals. 
Tne  system  adapter  may  define,  in  the  BIOS,  suen  devices  as 
tape  recorders  etc.  so  lone  as  it  is  interfaced 
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cassette 


•  it n  one  of  toe  logical  devices.  In  tms  adaptation  tne  list 


device  am  tne  console  device  are  ootn  mapped  to  tne  serial 
ei?e  connector  *nere  tne  CRT  console  is  connected.  Tne 
reader  is  "stubbed"  wltr.  an  "end  of  file"  input,  mat  is, 
instead  of  a  routine  to  interface  a  pnysicax  read  device, 
me  1 0 S  simply  returns  an  indication  mat  tne  read  nas  -eer. 
co-npiete.  And  tne  puncn  device  ^ap  is  "stunted"  *  i  t r.  a 
return  statement. 

C.  DISH  DEVICES 

1 .  Hard  Pistes,  Floppy  Disics 

Tnere  are  many  implementations  of  tne  ran  lisi 
tecnnologies .  Tnere  are  fixed  anc  -nova  Me  need  cisics, 
removable  lisi  pacics  and  ever,  comci  nati  on  nard  and  floppy 
systems.  Floppy  lisiettes  come  mainly  in  tne  5"  and  8"  size, 
single  and  ioubie  density,  sineie  ar.d  double  siied,  and  as 
indicated  above  in  combination  witn  nard  a i  sits . 

Organization  of  Data 

Altaoum  eacn  dist  drive  Tay  ce  different,  data  is 
stored  in  conceptually  tne  same  manner.  Tr.e  disK  surface  is 
divided  into  tracss  for  cylinders,  if  a  multi-platter 
system.)  Eacn  tractc  is  divided  into  sectors.  Eacn  sector  is 
addressable  cv  tne  controller,  malting  it  tne  basic  unit  of 
storage.  In  multi-platter  and/or  rulti-neai  systems,  to 
access  tne  disic  tne  controller  must  select  tr.e  proper 
nead/piatter  as  well  as  tne  tracs  and  sector  required. 
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Tne  amount  or  data  mat  ?aa  oe  stored  on  a  aevi-'a  is 
dependent  on  me  size  of  me  device  arc  me  reccrcirg 
format.  Dou  Die  density,  as  me  rare  it  sixes ,  gives  tv  me  as 
muon  storage  on  a  diskette  as  single  density.  Tr.e  cost, 
p.owever ,  is  treater. 

Altaouen  tne  casic  unit  of  storage  is  tne  sector, 
sectors  are  not  me  same  size  in  every  system  In  general, 
tne  larger  me  sector,  tne  more  efficient  me  storage,  cut 
tne  less  efficient  tne  access,  "lany  systems  allow  me  user 
to  select  tne  sector  size  from  a  limited  set  of  cnnces. 
Sectors  are  normally  a  multiple  of  129  nytes. 

3.  Interfaces  to  tne  Computer 

Tne  sey  to  tne  storage  of  information  on  tne 
recording  media,  at  least  from  tne  operating  system 
modifier's  point  of  view,  is  tne  disic  drive  controller.  Tne 
controller  itself  is  usually  a  microprogrammed 
nicroprocess or.  Tne  controller  candles  tr.e  actual  rearing 
from  and  writing  to  tne  lisi  in  addition  to  ot.ner  functions 
sucn  as  seetc ,  f orma t  etc.  Tne  relative  autonym;/  of  tne 
controller  frees  tne  operating  system  rrcm  Paving  to  r.ardie 
lisK  I/O  on  a  primitive  level.  However,  tne  3I0S,  *mcn  is 
narlware  specific,  must  still  ''ommunicam  witr.  tre 
controller  at  a  fairly  low  level. 

*ost  microcomputer  system  I/O  is  done  oy  Dm  A .  In 
general  tne  nost  operating  system  creates,  somewnere  m 
memory,  an  entity,  often  called  a  "command  pacKet"  or  "I/O 
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parameter  Diocs"  or  sot?  similarly  descriptive  nam^.  T-.e 
"pacKet"  is  usually  seven  to  ten  oytes  or  information  wni^n 
contain  tne  detailed  command  for  tne  nis*  drive  controller. 
Tnese  ’’pacsets"  form  tne  sole  means  or  issuing  I/O  commands 
to  tne  controller. 

Normally  tne  liss  drive  con troiler/i nterra ce  snares 
a  dus  witn  tne  nost  system.  As  a  result  tne  controller's 
command/status  resisters  nave  device  addresses  from  tne  bus. 
In  most  systems,  tney  can  ee  set  cv  tne  user  prior  to  system 
start-up. 

Tne  nost  system  sends  tne  address  of  tne  1/3  command 
pacset  to  tne  command  resisters  of  tne  controller.  Upon 
receipt  of  tnis  address  tne  controller  initiates  action  to 
gain  control  of  tne  dus.  Wnen  tne  controller  nas  control  cf 
tne  ous  it  reads  tne  appropriate  number  or  bytes  fror  tne 
address  it  was  given.  Tne  controller  decodes  tnis 
information  and  tnen  carries  out  tne  prescribed  operation . 
Tne  controller  may  signal  completion  in  various  ways,  tne 
most  common  oeing  entering  a  completion  cede  in  tne  command 
oacseet  for  tne  nost  to  read,  sending  an  interrupt  to  tne 
nost  processor,  or  storing  tne  status  in  an  on-ooari  status 
register  for  tne  nost  to  read. 

Many  systems  allow  tne  DMA  to  be  ” tnro ttied" ,  tnat 
is,  tne  controller  elves  up  control  of  tne  dus  periodically 
in  order  to  increase  overall  system  speed. 


0  tne  r  features  cc  rut  only  mciuaed  in  iisK  a  rive 
controllers  are:  linicei  I/O,  tnat  is,  tee  aDility  to  execute 
Tore  tnan  one  WO  commana  pac'tet  witnout  prompting  fron  tne 
nost  processor.  Multiple  sector  I/O,  tnat  is,  tne  ability  to 
real  or  write  more  tnan  one  sector  in  response  to  a  single 
I/O  co^mana  packet. 

4.  Examples  of  Particular  Controllers 
a.  1SEC  201  (Single  Density  mbs) 

Tne  iSBC  201,  as  described  in  Ref.  ?,  is  tne 
controller/interface  for  INTEL'S  INTE1LEC  VDS  H00,  an  8080 
processor  based  microcomputer  development  system. 

(l)  iSBC  201  Controller  Operation.  Tne 
controller  is  composed  of  two  circuit  boards,  a  cnannei 
board  and  an  interface  board.  Tney  interface  witn  tne  nost 
processor  via  tne  system  MULTI3US ,  a  system's  tus  used  by 
INTEL  Corporation.  Tne  cnannei  board  and  interface  board 
toeetner  nandie  an  communications  between  tne  nost  CPU  and 
tne  diskette  system.  They  contain  an  8-bit  microprogrammed 
processor  wnicn  can  access  system  memory  for  obtaining 
cnannei  commands  via  DMA.  Tne  controller  also  monitors  tne 
diss  subsystem  status  ana  error  conditions  and  maies  tnei r 
status  available  to  tne  nost  CPU. 

Tnis  diskette  system  records  data  by  tne 
Frequency  Modulation  (FM)  metnoa,  giving  a  formatted  s" 
diskette  capacity  of  approximately  256H  bytes,  divided  into 
77  trades  of  25  sectors  eacn. 
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Functionally,  tne  nost  CPU  rust  create  a 
command  nacset  m  memory  for  eaca  operation.  INTEL  calls 
tnis  pacset  an  I/O  Parameter  Blocs  (lOPJj).  An  IOPB  is  ten 
bytes  in  iengtn  and  specifies  all  tne  details  of  tne 
lissette  operation  to  be  performed.  Tne  CPU,  in  tne  case  of 
CP/M-Sb,  tarougn  tne  BIOS  module,  sends  tne  address  of  tie 
I3PB  to  tne  controller.  Tn.en  tne  controller  ?ains  control  or 
tne  bus,  retrieves  tne  I3PB  and  executes  tne  command.  Upcn 
completion  the  controller  posts  tne  diskette  subsystem 
status  and,  if  enabled  by  tne  I0P3,  sends  a  ccmoietion 
interrupt  to  tne  nost  CPU.  Tne  information  in  tne  IOFB 
consists  of: 

Byte  1  -  tne  cnannel  word,  tnis  byte  specifies  tne 

enabling  of  tne  iocs  override,  random  format 
of  tne  iocs  override,  random  format  sequence, 
interrupt  control,  lata  word  iengtn,  successor 
bit,  brancn  on  wait  ana  wait  bits. 

Byte  2  -  specifies  tne  drive  selected,  data  ier.gta  (5 
or  lb  oits/word)  and  tne  operation  to  be 
performed . 

Byte  6  -  specifies  tne  number  of  sectors  to  se 
t  ransf erred . 

Byte  4  -  specifies  tne  target  tracs  number  (£-77). 

By te  5  -  specifies  tne  first  sector  to  be  accessed  (1- 
28)  . 
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Byte  6  -  specifies  ttie  least  significant  byte  of  tne 
Duffer  address. 

Syte  ?  -  specifies  tne  most  significant  Dyte  of  tne 
buffer  airess. 

Syte  a  -  indicates  a  blocs  number  wnicn  allows  a  unique 
identification  of  an  IOPB  during  limited  IOPB 
operations. 

Byte  9  -  contains  tne  least  significant  byte  of  tne 
buffer  address  of  tne  next  linsed  1 0  F  £ . 

Byte  lk!  -  contains  tne  most  significant  byte  of  tne 
buffer  address  of  tne  next  limed  IOPB. 

Tne  iSBC  221  can  execute  seven  "ommaras: 

1)  recalibrate  (sees  tracs  0) 

2)  sees 

3)  format  a  tracK 

4)  write  data  (witnout  address  marss) 

5)  write  data 
5)  read  data 

7)  verify  CRC 

Tne  controller  nas  seven  registers  tnat  are 
accessible  to  tne  nost  CPU.  Tne  nost  CP'J  can  read  tnree  of 
tne  registers:  Tne  Result  Status  register  indicates  tne 
status  of  botn  drives  (ready  or  not  ready),  tne  status  of 
tne  controller  for  tnat  drive  (present  or  not  present',  and 
tne  status  of  tne  controller's  interrupt  flip-flop 
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(interrupt  pending  or  completed).  Toe  Result  Type  register 
indicates  wnetnsr  tne  Result  3yte  register  contains  I'O 
error  codes  or  ready  status.  Tne  Result  2yte  noids  tne  I/O 
error  codes  or  diskette  drive  status.  Tne  nost  C?rJ  can  write 
to  four  or  tne  controller's  registers:  Writing  anything  to 
tne  Reset  Dlssette  System  register  resets  tne  entire 
diskette  subsystem,  Writing  to  tne  Stop  Diskette  Operation 
register  terminates  I/O  after  completion  of  tne  current 
operation.  The  Memory  Address  Lower  register  receives  tne 
least  significant  byte  of  tne  address  of  tne  IOPE.  Tne 
Memory  Address  Upper  register  receives  tne  most  significant 
byte  of  tne  IOPE  address  and  wnen  written  into  signals  tne 
•'ontroller  to  retrieve  tne  I0P3  and  commence  tne  specified 
operation . 

(2)  BIOS  Use  of  tne  iS3C  201.  Tne  CP/M-es  EICS 
uses  only  operations  1»  P  and  5  (sees  is  implicit  in  read 
and  write  operations).  In  addition,  CP/M-Btt  io°s  net  use 
iinsed  IOPE's  and  only  does  single  sector  diss  accesses. 
Tnis  very  muen  simplifies  tne  I/O  routines  in  tne  EDOS  ard 
tne  EIOS.  Not  usme  tne  iinsed  ICPP  capability  allows 
reducing  tne  IOPBs  to  tne  first  seven  bytes,  of  wnicn  bytes 
1  and  3  remain  constant.  Byte  One  remains  unenangea  because 
tne  mole  of  diss  access  remains  unenanged.  Eyte  Tnree,  tne 
number  of  sectors,  remains  set  at  one,  and  tne  operating 
system  is  freed  from  computing  tne  number  of  sectors  per 
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access .  Tr.es  a  simplifications  alio*  t re  BIOS  ic  nav“  a 
single  IOPB  ten  pi  ate  in  memory. 

A  limitation  or  tr.e  iSEC  2i\  is  its  ltj-rit 
addressing.  Tnis  limitation  means  tnat  tne  controller  car. 
ony  address  t>4?  of  system  memory  as  comparer,  tc  tr.e  84'stj 
processor's  mesacvte  of  address  space.  As  a  result.  tr.e 
external  address  of  tne  iSEC  io/12  rust  resire  in  tne  first 
S4£  of  tne  megabyte  (from  to  fc'FFFFK^.  Tne  SICS  in 

tnis  adaptation  converts  tne  segment  anr  offset  address 
provided  by  tne  EDGE  into  a  16-tit  pnysicai  address  for  tr.e 
controller. 

(2)  Bootstrap  Use  of  tne  1SBC  2^1.  Tne  roots  trap 
program  does  use  tne  multi-sector  access  capability  of  tne 
controller  for  loading  tne  cold  start  leader.  Tnis  requires 
four  IOPEs  in  tne  bootstrap  program  but  reduces  tr.e  number 
cf  disic  accesses  from  52  to  four.  Considering  tne 

specialized  function  of  tne  bootstrap  loader  and  its  iac<  of 
interface  witn  tr.e  3D0S,  tnis  is  a  very  efficient  deviation 
from  tne  otner#ise  efficient  CP/M  metnoo  of  aisi  access, 
o.  iSEC  2Z2  (Double  Densi ty  MBS) 

Tne  iSEC  2Z2  is  tne  cont ro i ler/ir terrace  for 
INTEL'S  INTSLLEC  MDS  SBB  microcomputer  development  system. 
It  is  described  fully  In  Ref.  6. 

(1)  1SBC  2d2  Controller  Operation.  From  tne 
users  point  or  vie#  tnis  controller  is  essentially  tne  same 
as  tne  1SBC  2SJ1.  Tne  main  difference  is  tne  recording 
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format,  ''cdifiei-Modif  ied  frequency  Modulation  is 
used,  allowing  trie  same  media  to  acid  (formatted)  clRd  "ytes 
or  lata,  divided  into  ??  traces  or  52  sectors  eacn.  T r. i s  is 
twice  tne  capacity  of  tne  single  density  system. 

(2)  BIUS  Use  or  tne  iSBC  222.  Tne  interface  to 
tne  controller  is  tne  sane  as  tnat  of  tne  iSBC  221.  Tne 
difference  i n  organi zat ion  and  capacity  is  only  evident  in 
tne  dis«  definition  taole  "DOUBLE.! IB" . 

(3)  .Bootstrap  Use  of  tne  iSsC  222.  C?/m's  doucie 
density  formatter  formats  tne  first  two  tracics  of  a  diskette 
in  sineie  density,  ie.  26  sectors  per  tra~ic.  Tne  -old  start 
loader  fits  in  tne  first  two  tracics  of  a  aouDle  density  in 
tne  same  way  as  in  sineie  density.  4s  a  result,  tfie  same 
bootstrap  program  will  load  toe  cold  start  loader  from  ootn 
single  and  double  density  diskettes. 

c.  REM EX  RDV  3222 

Tne  RDtf  '6222 ,  as  described  dv  Ref.  y.  Ref.  10 
and  Ref.  11,  is  a  multi  drive  unit  consisting  of  a  fired 
Wincnester  Tecnnology  14"  disx  and  two  S"  flexible  diskette 
drives.  Tne  lisgette  drives  are  "jumper"  selected  as  eitner 
single  or  double  density.  In  Dotn  types  tne  sector  size  is 
selectable.  Tne  formatted  capacity  of  tne  fixed  aisx  witn 
sector  size  set  at  12S  bytes  is  10  megabytes.  Tnis  lata  is 
on  212  tracics  of  104  sectors  for  eacn  of  two  read/write 
neads.  Tne  single  density  floppy  drives,  formatted  for  ic9 
bytes  per  sector,  noil  26  sectors  on  eacn  of  tracics  for  a 
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total  of  255K  bytes  of  storage.  Set  for  aouDie  ler.sity,  to® 
smallest  sector  size  avaiiaoie  is  2S6  oytes.  At  'd5  sectors 
per  tracs,  for  77  tracscs,  formatted  storage  is  512£  oytes. 
If  tnis  drive  were  used  for  CP/M-Hb  in  tne  douDle  density 
mode ,  tne  difference  between  diskette  sector  size  (2*6 
bytes)  and  CP/M-Bo  sector  size  ( 12b  cytes^  would  be  dandled 
by  a  "blocffing/deDlocKing"  algoritnm  iitce  tne  one  provided 
witn  CP/M-P5 . 

(1)  Tne  P.D’tf  Controller.  Tne  neart  of  tne 
controller  is  a  microprogrammed  Motorola  bbS'C  fc-cit 
microprocessor.  Tne  controller  pnysicaiiy  resides  inside  tne 
R Drf  frame  and  is  linked  to  tne  dost  system  oy  an  interface 
card.  Tnls  alteration  utilized  a  MULTIBUS  interface,  wnicr. 
resided  In  tne  cost's  system  MULTIiiUS .  Tne  interface 
provides  registers  for  communication  between  tne  nost  ar.o 
tne  controller  CPU's.  Lata  can  be  naniiel  as  B-bit  words, 
lb-bit  words  or  as  B-bit  naif-words.  Tne  controller  can 
accompiisn  I/O  by  EMA,  programmed  I/O  or  by  interrupts.  All 
disic  writes  are  by  Moaif iea-Modified  Frequency  Modulation 
(MMFM).  Tne  disx  drive  system  can  also  op  LMA  throttled, 
wnicn  permits  otner  masters  to  gain  access  to  tne  system's 
bus  in  between  accesses  by  tne  disK  unit. 

Functionally,  tne  nost  CPU  must  create  a 
command  pacset  in  memory  for  eacn  operation,  ft  command 
packet  is  six  to  fourteen  bytes  In  iengtn  and  specifies  ail 
tne  details  of  tne  disc  operation  to  be  performed.  In  tre 
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UMA.  mode  tne  lost  CPU  must  test  tie  status  register  in  tie 
controller  interface  to  assure  mat  tne  controller  is  reaiy. 
V.nen  tne  controller  is  reaiy  tie  CP'J,  in  tr.e  case  cf 
C P/M-ee#  tnroumn  tne  PIGS  module,  sends  tne  address  of  tne 
command  packet  to  tie  controller  interface.  Tien  tie 
-'ontrolier  ?ains  ''ontrol  of  tne  bus,  retrieves  tr.e  command 
pacicet  and  executes  tne  command.  Upon  completion,  tie 
controller  posts  tne  disic  subsystem  status  in  tne  command 
pacicet  in  system  memory  and,  if  enabled  by  tne  command 
pacicet,  sends  a  completion  interrupt  to  tne  nost  CPU.  Tne 
command  pacicet  consists  of  six  to  fourteen  bytes.  Tms 
controller  supports  five  types  of  operations.  Tne  size  cf 
tne  pacicet  and  tne  information  it  contains  are  determined  by 
tne  operation  to  oe  performed.  Tne  five  operations  supported 
are : 

1)  real  data/write  data 

2)  write  I.E.  and  data  for  single  record 
(fixed  lisic  only) 

3)  copy  from  one  drive  to  anotner 

4)  format  designated  distc 

5)  maintenance  package 

Tne  controller  nas  four  registers  tnat  are 
accessible  to  tne  nost  CPU.  Tne  oase  address  of  t.iese 
registers  is  switcn  selectable.  Tne  base  address  plus  one  is 
tne  status  register,  from  wnicr.  tne  nost  CPU  determines 
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system  status.  Tne  case  address  plus  tnree  receives  me 
lower  oyte  of  tee  address  cf  trie  command  pactet.  Tr.e  rase 
address  ulus  two  receives  tne  middle  oyte  of  tne  command 
pactcet  address.  Tne  oase  address  receives  tne  uoper  oyt°  of 
tne  packet  address  ( EE  If  322k:  supports  24-bi  t  addressing )  and 
wnen  written  into  signa Is  tne  controller  to  start  D^A . 

(2)  BIOS  Use  of  tne  RDW  3222.  Tne  C?/M-66  BIOS 
would  use  only  tne  read/write  operation.  Tne  fact  mat  tr.e 
nari  dlst  nas  more  man  one  nead  would  require  mat  tne  BIOS 
dist  definition  table  loot  liire  one  continuous  set  of  traces 
and  tttat  prior  to  initiating  DMA,  tr.e  BIOS  translate  a 
logical  tract  numDer  to  a  pnysicai  neao  and  tract  number. 
Tne  read  and  write  pactets  nave  tne  same  format  wnicn 
requires  only  one  pactet  template  in  tae  BIOS.  Tnat  pactet 
tates  tne  following  form*  indicated  as  16-bit  words: 

Word  -  I/O  modifiers  (liated  I/O, interrupts, etc.  , 
operation  and  drive  selected. 

Word  1  -  status  word  -  written  oy  controller. 

Word  2  -  tract  numoer. 

Word  3  -  aead  and  sector  start  numoer. 

Word  4  -  lower  16  bits  of  DVA  address. 

Word  5  -  aign  byte  of  DMA  address. 

Word  6  -  transfer  word  count. 

Altnougn  tne  RDW  supports  24-bit 

addressing,  it  requires  a  24-oit  pnysicai  address,  not  tne 


segment  am  offset  type  address  provided  ty  tne  BIOS. 
Therefore  tne  BIOS  must  translate  tne  addresses  cerore 


placing  tnem  in  tne  command  packet  and  tefore  sending  tnem 
to  tne  interface. 

(3)  Bootstrap  Use  of  tne  P.Dd  3^0.  Tne 
Dootstrao  program  would  use  tne  nuiti-sectcr  access 
capaoility  of  tne  controller  for  loading  tne  cole  start 
loader  (tne  command  pactcet  specifies  tne  number  of  words 
to  be  transferred).  If  tne  operating  syster  were  to  be 
loaded  from  a  diskette,  tne  bootstrap  operation  would  be 
very  mucn  liice  tnat  described  for  tne  iSBC  2K1.  For  a 
system  load  from  tne  nard  disf  tne  bootstrap  program  could 
load  tne  operating  system  witnout  tne  use  of  a  cold  start 
loader.  Tnis  would  only  require  two  disK  accesses,  ore  to 
determine  tne  load  location  and  tne  otner  to  actually  load 
"C?M . S YS " . 
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17  .  ALTERATION  OF  CP/M-85 

A.  CHANGES  °EOTJI  RED  TO  IMPLEMENT  CP/M-H5 

As  distribute!,  CP/M-86  is  set  up  for  operation  wit n  an 
Intel  SBC  85/12  microcomputer  ana  an  Intel  SEC  2/e  iisirette 
controller  witn  a  Snueart  SA-80/  floppy  lisK  drive.  Sin~e 
CP/M-S6  is  modular,  only  tne  BIOS  need  oe  modified  for  "non 
standard"  narlware.  Tne  distribution  version  includes  source 
code  for  its  BIOS  and  a  skeletal  BIOS  to  ala  in  tne 
construction  of  a  customized  version.  Altnoush  tne 
distribution  version  does  not  provide  a  bootstrap  ROM,  tne 
source  code  for  tne  program  is  provided.  Tnis  source  cole 
provided  an  example  for  tne  creation  of  a  customized 
bootstrap  program.  The  bootstrap  ROM  is  available  from 
Digital  Kesearcn. 

Tne  cnanges  required  to  customize  tne  BIOS  ''an  be 
divided  into  four  types.  Tne  first  consideration  is  tne 
computer  selected  for  tne  implementation.  If  an  EEEb/Ek'bS 
based  computer  otner  tnan  tne  iSBC  S6/12  were  cnosen,  tne 
computer  initialization,  including  tne  constant  definitions 
for  USART  ports  anl  character  I/O  routines  suc.n  as  console 
status,  console  input  and  console  output,  nave  to  be  cnanged 
to  match  the  nost  nardware.  Since  the  iSBC  85/12  was  used, 
no  changes  were  required  in  tnis  portion  of  tne  BIOS. 
Second,  if  the  disjs  drive  controller  or  otner  DMA  device  is 
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not  an  iSBC  204,  tne  controller  port  definitions  ar.l  tne 
routines  wnicn  actually  communicate  witn  tne  controller  must 
be  altered.  Tne  "execute"  am  "sendcom"  routines  were  tr.e 
Dull  of  tne  modification.  Tnese  routines  cnecic  system 
status,  translate  system  commands  tc  tne  language  of  tne 
controller,  deliver  tne  commands  to  tne  hardware  ana  r.anaie 
any  nardware  errors.  Tnirl,  if  any  otner  serial  or  parallel 
I/O  device  is  to  be  used,  tne  appropriate  initialization  and 
execution  routines  must  oe  written.  Tne  fourtn  consideration 
is  tne  dist  definition  table  wnicn  is  assembled  witn  tne 
BIOS  via  an  "include”  statement.  Disir  parameter  tables  must 
be  created  to  describe  tne  disit  system.  Disir  parameter 
tables  are  discussed  in  tne  next  section.  In  tnis  version 
only  tne  second  and  fourtn  types  of  modifications  were 
necessary  and  tnose  cnanges  are  reflected  in  Appendix  A 
(single  density)  and  Appendix  B  (double  density'.  Appendix  0 
contains  tne  distribution  BIOS.  After  assembling  tne  BIOS, 
tfte  nexadeclmal  code,  "BI0S.HS5",  is  appended  to  "CFM.Kys” 
and  a  command  file  is  generated  by  tne  metnod  described  ir. 
Ref.  6  usine  tne  &ENCMD  utility.  Tne  file  created  is  nared 
"CPM.STS"  and  is  tne  operating  system. 

B.  DISK  PARAMETER  TABLES 

Tne  disir  parameter  tame  serves  to  define  the 
oreanization  of  the  storage  media  for  tne  BEOS  file 
management  functions.  Tne  disir  definition  consists  of  tne 


sequence  of  statements  In  Figure  6  (as  snown  in  Ref.  6'.  Tne 
DISKS  statement  defines  tne  number  of  drives  in  tne  syste-r, 
w itn  a  being  an  integer  from  1  to  16.  A  series  of  DISKDEF 
statements  follow.  Eacn  statement  nefinps  tne 
cnaracteristics  of  a  logical  list.  0  tnrougr.  n-1.  DISKDEF 
statements  are  formed  as  defined  in  Ref.  6.  Tne  format  is 
snown  in  Figure  ?. 


DISKS  n 
DISKDEF  0,... 
DISKDEF  1,... 


DISEDEF  n-1 


ENDEF 

Figure  5  BIOS  Dist  Definition  File. 


DISKDEF  dn ,?sc ,lsc , [stf J , bis ,dts ,dir ,cts  ,  of s , ! 


wnere 


dn  is  tne  logical  dist  number,  0  to  n-1 

fsc  is  tne  first  pr.ysical  sector  numoer  (e  or  1> 

isc  is  tne  last  sector  number 

st?  is  tne  optional  stew  factor 

ols  is  tne  data  allocation  nioct  size 

dies  is  tne  dist  size  in  fcis  units 

dir  is  tne  number  of  jjirectorjr  entries 

cts  is  tne  number  of  erected  directory  entries 

ofs  is  tne  tract  offset  to  logical  tract  it 

[0]  is  an  optional  1.4  compatibility  fia* 

Figure  7  DISKDEF  Statement  Format. 


Tne  dist  tables  may  be  generated  by  nand  or  by  executing 
tne  GENDEF  utility  proeram.  Tne  table  provided  witn  tne 


distribution  version,  called  "S INGLES  .LIB"  ,  was  generated 
iron  tne  source  file  ”S  I  NOLL’S  .DEF"  cy  tne  GENDEF  utility 
running  under  CP/V-eu.  Tms  table  was  correct  for  tne  single 
density  implementation.  It  was  necessary  to  create  a  -ew 
table  for  tne  double  density  syster.  Tnis  file  is  called 
DOUBLE. DEF.  Taoie  veneration  is  descriced  fully  m  Section  6 
of  Ref.  5.  Tne  disic  parameter  tames  are  listed  ir.  tne  BIOS 
rignt  after  tne  "include"  statement  (see  Appendices  A  and 
B). 

C.  COLD  START 

1 .  Tne  Cold  Start  Loader 

Since  CP/?!-B6  is  too  large  to  fit  in  tne  first  two 
(system)  tracts  of  a  diskette,  it  Is  loaded  into  memory  in 
two  st  ps.  First,  a  cold  start  loader  is  loaded  from  tne 
first  two  traces  Into  memory.  Next  tne  loader  loans  tne 
operating  system  and  transfers  control  to  it.  Tne  loader 
("LOADER. C'iD")  is  a  simplified  version  of  CP/*!-=e  wita 
enougn  power  to  locate  tne  operating  system  file  "CPM.sys" 
on  tne  current  disic,  maice  tne  proper  initializations,  load 
CP/'d-SS  into  memory  and  tnen  transfer  urogram  control  to  it. 
Tne  loader  is  created  from  files  LDCPM,  IDBDOS  ar.a  tne 
loader  version  of  tne  BIOS.  Tne  loader  BIOS  is  generated 
from  tne  same  source  code  as  tne  3I0S  by  setting  tne 
software  switrn  "LCADER_BICS "  equal  to  true  prior  to 
assem  biy . 
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Tne  loader  program  is  roved  to  tne  first  two  tracxs  of  a 
disxette  by  tne  LECOPY  utility  if  running  on  a  wording 
CP/m-36  system.  If  deveiopement  is  done  on  a  CP/v-8£  system 
this  can  be  accomplished  witn  tne  DDT  and  SYSGEN  utilities. 
P.ef.  6  errs  in  its  discription  of  tne  latter  procedure.  Tne 
-orrect  procedure  is  described  in  the  next  chapter. 

'i .  Tne  Bootstrap  ROM 

In  order  to  get  tne  cold  start  loader  into  memory, 
tnere  must  oe  a  oootstrap  loader  of  some  xind.  Tnis  coot 
loader  must  initialize  tne  programmable  cnips  on  tne  single 
Doard  computer  and  tne  aisx  drive  controller  wnicn  will 
access  the  operating  system  lisK.  It  then  loads  tne  tirst 
two  tractcs  of  tne  diskette  in  tne  system  aisx  drive  into 
memory  and  then  transfers  control  to  tne  program  loaded, 
"LOADER. CMD" .  Tne  bootstrap  program  is  normally  resident  in 
a  read  only  memory  (ROM)  or  electrically  programmable  ROM 
(EPROM)  and  Is  tnen  referenced  to  as  tne  coot  F.OM. 

The  distribution  version  of  CP/w-86  also  contains 
tne  listing  for  a  oootstrap  RCM  (R0M.A66).  Tne  boot  ROM 
itself  is  available  from  Digital  Research.  When  installed, 
it  becomes  part  of  the  8086  add-ess  space.  Upon  system 
reset,  the  processor  begins  execution  at  effective  address 
0PF000H,  wnicn  is  tne  top  paragrapn  of  tne  iSBC  86/li:  EPROM 
space.  The  bootstrap  program  is  Hardware  dependent  which 
necessitated  tne  creation  of  a  customized  initial  loader  for 
this  implementation. 
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Intel's  SBC  9b>?  Execution  Venicie  Monitor  (EVM) 
occuoies  tne  EPROM  locations  wnen  installed  in  tne  iSRC 
-6/12  and  is  currently  in  use  at  tne  Naval  Pos teraduate 
Sesool.  In  order  to  retain  tne  use  of  tne  iSBC  95?  ar.  tc 
simplify  implementation ,  tne  customized  bootstrap  program 
nas  ce^n  embedded  in  a  free  area  of  tne  E’/^'s  EPROMs.  Sirs'-? 
tne  monitor  initializes  tne  single  board  computer  wiser.  it  is 
started,  tne  CP/M-fc6  Bootstrap  tas*  is  simplified.  Tne 
bootstrap  program  listing  is  in  Appendix  C.  It  is  a  modified 
version  of  tne  "debug”  version  of  Digital  Researcn's  ROM 
program.  Tne  modified  cootstrap  program  is  located  at 
effective  address  ZFFD4FH.  It  may  be  executed  from  tr.e  27v 
by  executing  tne  command  GFFD4:0  or  its  equivalent. 
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7.  CONCLUSIONS  AND  RSCQMM 2 NPATION! 5 


A  .  ADAPTATION  DimcrJLTv 


Modification 

of 

C  P /M “fc  o  is 

a 

s t raigntt'orwa rd  simple 

procedure 

if  o  ne 

is 

familiar 

wi  tn 

CP  'M  on  a  system  '$ 

software 

1  eve  1 

and 

wi  tn  at 

least 

some  representative 

nardware. 

If  one 

does 

not  nave  5^ 

cn  a 

cacfground  (tne  autnor 

ill  not)*  tne  tasjc  is  not  overvnelming,  out  considerably 
more  difficult.  Tne  novice  will  protacly  invest  mucn  tine 

and  effort  in  investigating  "lead  ends"  because  of  not 
understanding  tne  logical  design  of  tne  operating  system,  a 
Darticularly  vexing  problem  encountered  in  tne  first 
adaptation  was  tnat  in  tne  later  stages  of  development, 
every  error  in  tne  corrected  software  seemed  to  destroy  tne 
information  on  tne  diskette,  mating  debugging  difficult  and 
requiring  frequent  regeneration  of  software.  During  tnis 
period  of  "destructive  testing"  approximately  yet  of  tne 
time  and  effort  were  spent  on  sucn  overnead  and  only  let  on 
actual  debugging.  Tne  real  proDiem  tnere  was  not  tne  time 
lost  but  tne  interruption  in  tne  train  of  tnougnt. 

Documentation  inadequacies  are  anotner  source  of 
problems.  Tne  alteration  guide  for  CP/M-tb  provided  ny 
Digital  Researcn  (Ref.  6)  assumed  a  tnorougn  knowledge  of 
CP/M-S0,  wnicn  was  not  possessed  Dy  tne  autnor.  Tne  CF/v-80 
documentation  also  seemed  to  assume  a  tnorougn  knowledge  of 
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tne  ODeratin?  system's  nodules .  Ia  addition,  mere  were 
several  errors  in  tne  alteration  guide. 

Tne  procedure  for  moving  tne  cold  start  loader  to  traces 
zero  ana  one  under  CP/v-80  is  incorrect  and  if  followed  tne 
first  30ZH  bytes  of  tne  program  win  be  lost,  A  ~r;rrect 
procedure  is  to  load  tne  cola  start  loader  «itr.  DDT ,  -"o vs 
tne  program  so  tnat  it  starts  it  900H,  exit  DDT  and  finally 
call  tne  SYSGEN  utility.  A  correct  sequence  of  commands 
Iooks  litce  tnis: 

DDT  LOADER. CPD 
■nll00,1800,190ia 
ma00,1100  ,1'000 
m400,ae0,cee 
ml00,400  ,900 
<C  ONTROL-C  > 

SYSGEN 

<CR> 

£ 

<CR> 

Tne  documentation  for  tne  3038  assemblers,  "ftSvicb.CO/” 
and  "aSV85.CMD"  also  contains  errors.  According  to  tne 
user's  manual,  IRef.  0j  ,  tne  "device  switcn"  for  tne  listing 
device  is  Tne  correct  switcn  is  "y”. 

Tne  tecnnical  manuals  provided  witn  tne  disx  drives  ana 


controllers  used  ratner  ambiguous  and  non  standardize! 


terns.  Tnl s  often  required  experimentation  to  determine  wna t 
was  really  meant. 

Resolution  of  me  above  difficulties,  nowever,  was  a 
good  learning  experience  for  tne  autnor. 

b.  RECOMMENDATIONS  FOR  FUTURE  HARD  DISK  ADDITION 

1 .  Discussion 

Altnouen  there  are  several  metnois  of  accomplishing 
disc  I/O,  DMA  seems  to  be  tne  simplest  to  implement  and 
debug.  A  future  hari  disK  addition  would  greatly  enhance 
CP/M-96's  usefulness.  In  tms  vein,  a  nard  aisK/floppy  disK 
combination  would  be  ideal.  The  combination  of  hard  and 
floppy  disirs  would  provide  tne  speed  ana  storage  capacity  on 
one  hand  (from  tne  nard  disi)  ana  tne  ability  for  tne  user 
to  teep  copies  of  nis  files  where  he  is  assurei  or  their 
security  and  integrity.  However,  inclusion  of  tne  iSBC  2V.1 
or  222  is  not  recommended.  Tne  limited  addressing  capability 
of  tnese  controllers  would  nir.der  overall  system 
effectiveness  and  force  tne  processor  to  operate  in  tne 
bottom  64K  of  tne  address  space.  As  a  rule  of  tnumo,  if  mere 
tnan  one  device  is  to  be  aided  to  tne  basic  system,  only  one 
device  snould  be  added  at  a  time. 

2.  Template  for  Adaptation 

Given  tnat  a  nard  disK  is  to  be  installed  in  place 
of  tne  diskette  system,  tne  following  procedure  sncuid  oe 


followed 


First,  tne  CP/V-£fc>  BIOS  saoulc  be  studied  in 
conjunction  witn  tne  current  hardware  to  see  now  tne 
interface  is  currently  accomplished .  Tne  system  modifier 
must  understand  now  tne  operating  system  interacts  witn 
nardware  before  creating  nis  own  interface.  Second,  tne 
target  nardware  must  ce  studied.  Tne  electronics  are  not 
important,  but  wnat  tne  nardware  dees  logically  and  new  it 
communicates  witn  tne  controller  is  paramount.  In 
particular,  tne  organization  of  data  on  a  dist  drive  must  be 
thoroughly  understood.  It  tne  organization  of  data  is 
selectable,  tne  most  efficient  and  straightforward 
organization  must  fie  chosen.  If  it  is  not  selectable  and  not 
directly  compatible  witn  tne  3D0S,  a  "ciocting/debiocting" 
or  some  other  seneme  must  fie  considered.  Third,  a  list 
definition  must  fie  written  to  reflect  tne  logical 
organization  of  tne  dist.  If  the  logical  organization  cf 
data  does  not  maten  its  physical  organization,  tne  executing 
routine  in  the  BIOS  would  nave  tc  mate  tne  translation.  Fcr 
example,  in  a  multi  nead  dist  system,  tne  tracts  would  nave 
to  fie  numbered  in  tne  list  definition  as  though  tney  were  on 
tne  same  platter  (logical  org.),  tne  Bros  would  select  a 
sector  and  a  ‘'logical”  tract  for  I/O,  but  before  sending  tne 
channel  command  tne  BIOS  would  nave  translate  tnat  "logical" 
tract  number  to  a  nead  and  tract  combination.  Fourtn,  a 
template  for  tne  cnannel  command  should  be  placed  in  tne 
BIOS  with  appropriate  variable  names  to  allow  the  BDOS  to 


provide  as  ruca  information  directly  as  possible.  Piftn, 
write  tne  "execute"  routine.  Tni  s  routine,  tee  oulic  of  tne 
coding,  must  complete  tne  ctiannel  command,  prepare  tne  lisle 
for  access,  send  tne  activating  command,  cneck  comDletior. 
status  and  candle  nardware  errors.  Tnis  step  requires  a  good 
knowledge  of  tne  target  disk  system  and  is  very  muon 
dependent  on  tne  disk  cnosen.  Sixtn,  once  tne  reviser  BIOS 
is  written,  it  must  be  assembled  (in  tne  loader  version  too, 
if  booting  from  a  floppy  disk).  Tne  files  "CP*.H86", 
"BI0S.HS6"  and  "PAT2 .H86"  are  combined  into  ’’CPMX.HBS".  Tnis 
resulting  file  is  converted  to  executable  form  oy  executing 
tne  command  "3ENCMD  CP!“!X  S08e,{A40]"  as  described  in  Ref.  5. 
Tne  resulting  file  is  tnen  renamed  "CPtt.STS". 

The  bootstrap  program  will  be  very  simple.  It  can  te 
written  to  explicitly  read  t.ne  first  sector  of  tne  disk,  tc 
determine  tne  loading  target  address,  and  to  read  tne 
following  76  {128  byte)  sectors.  Once  tne  BIOS  nas  been 
modified,  tne  bootstrap  program  will  be  almost  a  trivial 
subset  of  tnat  code. 
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APPENDIX  A 


title  'Customized  Basic  I/O  System' 

W>WW;W<<**^  W*WW  WW  WW  W  WSW  W  W  W>W  W=*W=? 


V  V 

*  Tnis  Customized  BIOS  adapts  CP/M-*6  to  9 

9  tne  following  nardvare  configuration  v 

9  Processor:  iSEC  dbl2  '•* 

9  Controller:  i SBC  201  9 

9  memory  model:  «0B0  9 

9  Programmer:  M.B.  Caadalor  9 

9  Revisions  :  9 

v  * 


W*  W*  **  W  WW  W  W9  W  WWW  wise*?**  WV’WV’W'WV 


true 

equ 

-1 

false 

equ 

not 

true 

cr 

equ 

0da 

Jcarriatre  return 

if 

equ 

0an 

•line  feed 

max_retries 

equ 

10 

Jfcr  aisi  i/o,  before  perm  error 

**¥  W*  W  W  WW  W  WW  W  JWSM*  W>W  *7?  W«  w^ww  w 


9  Loader_bios  is  true  if  assembling  tne  * 
9  LOADER  BIGS,  otnerwise  BIOS  is  for  tne  9 
9  CP*!. SYS  file.  * 

V  V 


w  W9  W  W  W  W  WW  W9««  WW«  WW  W  wiicw^vv  WW 


L0ADER_BI0S  EOU  TRUE 

odos_int  equ  224  ireserved  BDOS  interrupt 


IF  not  loader  bios 


; - 

•  i 
»  i 

bios_code 

ccp_of fset 

odos  ofst 
-  1  “* 

9  1 

i 

i 

equ  2500n 
equ  0000n 

equ  0B06n  ;  BDOS  entry  DOint 

1 

1 

ENDIF 

Jnot  loader_bios 

IF 

loader  bios 

• 

» 


Dios_coae 
ccp_of f set 
bdos  ofst 


equ  1200n  ; start  of  LDBIOS 
equ  0003a  »  base  of  CP!*LQADER 
equ  0406n  ^stripped  BDOS  entry 
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cs  t  s 
cla  ta 


ENEI  E  i 

equ  tfian 
eau  0dBn 


Jioaier  bios 


;  13251  status  port 
;  lata 


v  tf  ?  *  99  ***  ***  V  V*  *  WV  V  ¥  *  a***  V  WW 

3?  ^ 

*  INTEL  iSBC  201  Dis£  Controller  Ports  * 

V  V 


base 

equ 

073n 

rtype 

equ 

case  *1 

roy  te 

equ 

base-*-3 

reset 

equ 

base+7 

astat 

equ 

base 

iiov 

equ 

oase+1 

inien 

eau 

oase+2 

cseg 

org 

ccpoffset 

ccp : 

0T2 

bios_coie 

»* 

* 

•  *  BIOS  Jump 

Vector  for  Individual  Routines  * 

JTJD 

IV  IT 

;  Enter  fro?)  300 T  ROM  or  LOADER 

,)Tip 

if  BOOT 

JArrive  tie  re  from  3DCS  call  0 

j^P 

CONST 

•return  console  Keyboard  status 

J*P 

COVIN 

;  re  turn  console  Key  ooari  cnar 

JTIO 

CCNOUT 

Write  cr.ar  to  console  levice 

J*P 

LI  STOUT 

Write  cnaracter  to  list  aevice 

J^P 

PUNCH 

Write  cnaracter  to  puncn  device 

J-np 

READER 

•return  cnar  from  reader  levice 

j^P 

HOME 

Wove  to  t rit  eo  on  cur  sel  drive 

jTip 

SELLSS 

•  select  dlSK  for  next  rd /write 

j^P 

SETTRE 

Jset  tractc  tor  next  rl/write 

jUp 

SETSEC 

•set  sector  for  next  rd/write 

J’np 

SET DM A 

•set  offset  for  user  cuff  (DMA ) 

.HP 

READ 

Jreai  a  12B  byte  sector 

HP 

WRITE 

Write  a  12b  byte  sector 

HP 

LISTST 

Jreturn  list  status 

Imp  SSCTHAN 
j  Tip  SETDV'AB 
j-np  GETSEGT 
jmp  GFTIC2F 
jmp  SLTIOiF 


{xiate  ioeical->pr.ysi  cal  sector 
.set  se^  oase  for  cuff  (DMA) 
{return  offset  of  yem  Desc  Tam® 
.'return  I/O  rap  Dyte  (IC2YTE) 
.set  I/O  tap  byte  (IOEYTE^ 


W¥'?*Pr  v1!*  •>*  W  W  W*!1  W  W'iSV'^  Wv 

*  INIT  Entry  Point,  Differs  for  LDP  I  OS  arc!  * 
v  EIOS,  according  to  "Lcaaer_Ei os "  value  * 

*  —  v 

VW  W  WW  W9  WWWWWW  W  WWW 


INIT: 


{print  signon  message  ana  initialize  na re ware 
mov  ax.es  » we  enterea  witn  a  JMPF  so  use 

mov  ss,ax  {CS:  as  tae  initial  value  of  S 

mov  is , ax  {  DS  :  , 


mov  es.ax  .and  ES: 

; use  local  stacic  during  initialization 

mov  sp, offset  stKDase 

eld  .set  forward  airection 


IF  not  loader_Dios 

i  i  ! 

;  Tnls  is  a  BIOS  for  tae  CPM.STS  file. 

{  Setup  ail  interrupt  vectors  in  low 
{  memory  to  address  trap 

pusn  as  .save  tae  DS  register 

mov  lOBITE.e  ; clear  I0BYTE 

mov  ax.tf 
mov  is, ax 

mov  es.ax  .set  ES  ana  CS  to  zero 

{setup  interrupt  to  address  trap  routine 
mov  int45_of  f  set  .offset  int_tra? 
mov  int0_segment ,CS 
mov  di  ,4 

mov  si, 45  jtnen  propaeate 

mov  cx,51«$  .trap  vector  to 

rep  movs  ax, ax  .ail  d 5b  interrupts 

{ BDOS  offset  to  proper  interrupt 

mov  Odos_off set , caos_ofst 

pop  as  {restore  tne  DS  register 


(additional  CP/M-ttf  initialization) 


ENDIF  {not  loader  Dios 


IF 


loader  oios 


;  Tni  s  is  a  3  IDS  for  tr.°  LOALJSP. 
pusti  is  Jsave  lata  segment 

mov  ax,  A 

mcv  as ,  ax  ipcint  to  segment  zero 

53DOS  interrupt  onset 
•nov  bdos_of rset , oao s_of s t 

me v  olos_segment ,CS  ioaos  interrupt  segment 
(additional  LOADER  ini  tiaiizati  on  ' 
pop  as  .restore  aata  segment 


iNDI  F  iloaaer  bios 


mov  ox, offset 
call  p-nsg 
mov  c  1 ,  tf 
jmp  cep 


s i?non 

ipnnt  signon  message 
;aefauj.t  to  ar  A:  on  coiistart 
.jump  to  eoii  start  entry  or  CCI 


4SOOT:  jmp  ccp+6 


iairect  entry  to  CCP  at  oommanc 


IF  not  ioader  bios 


i 

i 


nt 


i 

i 


cii 

mov  ax.es 
mov  as, ax 
mov  ox, offset 
call  pmsg 
ill  t 


i 

i 


i  docs  interrupts 

»get  our  lata  segment 
int_trp 

ir.ardstop 


I 

I 


FNEIF  inot  icaaer_oios 

W 

*  CP/'l  Cnaracter  I/O  Interface  Routines  v 

“  console  is  USART  (16251A)  on  iSDC  8612  * 

*  at  ports  Dfc/DA  w 

CONST:  iconsoie  status 

ir.  ai.csts 
and  ai , 2 
jz  const_ret 

or  ai,255  ireturn  non-zero  if  raa 

cons  t_ret : 

ret  irevr  data  available 


level 
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i 


r 


i 


CON IM : 

call  CONST 

tconsoie  input 

jz  CONIN 
in  al  ,cda  ta 

jwait  for  RCA 

and  al,?ffl 
ret 

tread  data  S  remove 

parity  nit 

CONOUT:  ; console 

in  al.csts 

output 

ana  ai,l 
jz  CONOUT 
mov  ai,cl 

tget  console  status 

out  ciata.ai 

transmitter  Buffer 

is  empty 

ret 

ttnen  return  data 

LISTOUT : 

re  t 


♦list  device  output 
fnot  Implemented' 


LISTST: 


ret 


tpoli  list  status 
Jnot  implemented 


PUNCH:  iwrite  puncn  device 

•not  implemented 

READER: 

mov  al.lan  treturn  eor  for  now 

ret 


OETI03E : 

v0?  AL ,  fej 
ret 

SSTI03F: 

ret 

t  P.outine  to  ?et  ana 
;  and  sairt  it 

uconecno : 

call  CONIN 
pusa  ax 
mov  cl,al 
call  CONOUT 
pep  ax 
emp  al , 'a 
j  b  uret 
emp  ai ,  'z  ' 

Ja  uret 


tlOBiTE  NOT  IMP CEMENTED 

fiooyte  not  implemented 


iget  a  console  cnaracter 
tsave  and 
tecno  to  console 
tiess  tnan  'a'  is  ok 
iereater  tnan  'z'  is  ok 


ecno  a  console  cnaracter 
to  upper  case 
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1 


urs  t : 


sub  ai ,  a  -'a  {else  snift  to  cans 


pmsg : 


mcv  ai  ,  LBX  J 
test  ai.ai 
jz  return 
mov  CL,AL 
call  CONOUT 
inc  EX 
j-nps  pmsg 


{get  next  cr.ar  from  message 


{if  zero  return 


{ orin  t  it 


insit  cnararter  and  loon 


9999  9999*  w  9999  «««««««« 

*  9 

*  Disff  Input/Output  Routines  * 

*  9 
9999  W99999  99999  99  9999  999999999999999  W9  9  99  99 


SELDSK:  {select  disfc  given  by  register  CL 

ndis«s  equ  id  {number  of  discs  (up  to  16^ 
mov  disc, cl  {save  disic  number 

mov  dx  ,  000011  {ready  for  error  return 
cmp  cifndis«cs  *n  beyond  max  discs? 

jnb  return  {return  if  so 

mov  cn,0  {doubie(n) 

mov  bx,cx  >bx  =  n 

mov  ci , 4  {ready  for  *16 

sni  bx.cl  {n  =  n  *  lb 

mov  cx, offset  l phase 
add  bx.cx  {dpDase  +  n  *  16 

return:  ret  {ox  =  .dpn 

HCmE:  {move  selected  disc  to  nome  position  (Trace  0) 

mov  io  com,nomcom 
mov  trs,0 
call  execute 
ret 

SETTRK:  {set  trace  address  given  by  CL 
mov  trfc,CL 
ret 

SETSEC:  {set  sector  number  given  by  ci 
mov  sect.CL 
ret 


SECTRAN :  {translate  sector  CX  uslne  tacie  at  [CXJ 
mov  cn,0 
mov  bx.cx 

add  bx,dx  {add  sector  to  tran  table  address 

mov  bi,[oxj  {get  logical  sector 


ret 


3ETDMA:  » set  DM A  offset  eiwet  by  CX 
mov  ima_air,CX 
ret 


SETEvae:  >set  Dma  segment  2iven  cy  CX 
mov  dma_seg,CX 
ret 

! 

GETSEGT:  ireturn  aaaress  of  pnysicai  memory  tacie 
mov  ox, offset  se2_tacie 
ret 


5?:  Jjt  JJC  a;c  3QC  Jjc  *  ;?  xfi  *  #  ajc  jjc  W  *  V  *  *  W  W  *«  *s  s*  s*  *  V  **  **  V 

V  *!• 


* 

Ail  list 

I/O  narameters  are  setu 

nt 

DISE 

1  s 

disc  numcer 

(SELES  A) 

i.s 

THE 

is 

tracit  numner 

(SETT RE) 

* 

* 

SECT 

is 

sector  numcer 

(SETSEC) 

we 

DMA_ADR  is  tne  DMA  isd  offset  * 

READ  reads  tne  selected  sector  to  tne  DMA* 
address,  and  WRITE  writes  tne  data  from  * 
tne  DMA  address  to  tne  selected  sector  ** 

•* 


READ: 

rrov  cl, 4 
mov  ai.disic 
sal  al.ci 
or  al.ricode 
mov  io_com,ai 
jmps  execute 

WRITE: 

mov  cl, 4 
mov  al, disit 
sal  al.ci 
or  al.wrcode 
mov  io_com,ai 

EXECUTE : 


Jcomoine  disjt  selection 
Jwitn  opcode 

Jcreate  iopc 


;  create  iopn  for  *rite 


outer_retry : 

mov  rtry_cnt  ,max__retries 

retry: 

in  al.rtype  Jciear  controller 

in  ai.myte  * 

call  senicom 


iiie:  in  al.lstat  ;*aii  for  ~orpietion 

and  ai,4  Jreaav 

jz  idle 

;  cnees  i.o.  completion  ok 

In  ai,rtype 

;  20  unlinKei  i/o  complete  21  linKec  1 /o  ccrp 

;  12  diss  status  cnaaizel  11  (not  used) 

;  must  ce  a  d'h  in  ai 

test  al,12o  5  ready  status  cnangev 

JNZ  af  READY 
OR  AltSf 

jnz  werror  Jsone  otner  error,  retry 

;  cnecK  i/o  error  tuts 

in  ai.rtyte 
rci  ai,l 

!i>ov  err_coie,80n 

j o  wready  Junit  not  ready 

rcr  al,l 

tov  err_coie,ai 

and  ai.tffen  *any  otner  errors? 

jr.z  werror 

» 

;  real  or  write  is  ok,  al  contains  v: 

ret 

wready:  inot  ready,  treat  as  an  error  for  now 
in  ax.rbyte  ,'ciear  result  cyte 

j-nps  trycount 


werror:  *  return  nardware  rial function 


trycount: 

dec  rtry_cnt 
jnz  retry 
"ov  al,err  cole 
nov  an, 2 

mov  ox, ax  jnaite  error  coae  16  bits 

tov  bx,errtbl  IEXJ 

call  pmsg  iprlnt  appropriate  message 

in  ai.cdata  Jt’lusn  usart  receiver  buffer 


call  uconecno 
c-np  al ,  'C  ' 
je  wboot_i 
c-np  al ,  'R' 
je  outer_retry 
c-op  al,'T' 
je  z_ret 
or  al,0b5 
:  ret 


{read  upper  -'ase  console  c.cara-'ter 
icancei 

Jretry  le  Tore  tires 
Jienore  error 

;set  coae  for  permanent  error 


z  ret 


rfCoot_l:  Jcan't  maice  it  #/  a  snort  leap 

j -n p  tfSOOT 


;  ¥  rx 

'*  sendcotn  sens  tte  address  of  tne  iopti  to  * 

;*  tne  iSBC  201  * 

:  ¥  v 


•  WWW  W»VV  ¥¥  ¥¥¥¥  ¥¥  ¥¥¥¥¥ 

sendcom : 

MOV  CL,4 
MOV  AX, DM A  SK5 
SAL  AX, CL 
ALD  AX, DMA  ADR 
MOV  10  ADR, AX 
MOV  CL 74 
MOV  AX ,CS 
SAL  AX, CL 

ADD  AX ,  OFFSET  CHANCMD  JADD  SEG  6.  OFFSET  FOR  201 

out  iiow.al 

mov  cl  ,6 

sar  ax,ci 

out  inign  ,ai 

ret 

;  ¥¥¥ ¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥ ¥¥¥¥¥¥ ¥¥¥ ¥¥¥ ¥¥¥ ¥¥¥¥¥ 

;  ¥  v 

»*  Data  Areas  * 

;  ¥  ¥ 

• ¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥¥ ¥¥¥¥¥¥¥¥¥¥¥¥ 

lata_offset  eau  offset  $ 

dseg 

org  iata_offset  Jcontigucus  wits,  coce  segment 

IDBYTF  do  0 

diss  do  0  ?disA  nutiDer 

cnancmd  do  son  fiopo  cnannei  word 

io_com  db  Z 

nsec  db  1  ;nu"noer  sectors  to  ifer 

trie  db  0 

sect  db  0  jstart  sector 

I0_ADR  DW  0000E  JPSYS  ADDR  FOR  SBC201  USE 

dna_adr  iw  00B0n  JDMA  adr  (default) 

dma~seg  dw  0  *Dma  Base  Segment 

HOM  COM  SOU  3 

RDCODE  SOU  4 
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fr*55STK 


— R r.  CODE  CE  SfttfH 


vrcUds 

sea  6 

IF 

1 oadsr_bi os 

f 

•  1 
f  l 

sienon 

•  1 

9  t 

lb 

lb 

1 

\ 

o r. if. or, If 

'CP/M-66  Version  1 .2 ' , cr , if , t 

\ 

1 

J  "  " 

ENDIF 

;  ioaaer_bio s 

IF 

not  loader_bios 

9  ! 

si^non 

db 

! 

I 

cr,if ,cr,if 

4b 

'System  Generated  04/22/31' 

•  i 

9  | 

d  b 

cr f if fa 

1 

1 

» 


ENDIF  ;not  loader  bios 


int_trp 

db 

o  r ,  1 f 

d  b 

'Interrupt  Trap  Sait' 

db 

cr,lf,2 

errt  bl 

dw 

era , erl ,er2 ,er3 

dw 

er4,er5,er6,er7 

dw 

erS ,er9 ,erA,er3 

dw 

erC,erD,erE,erF 

dw 

eria  ,er20  ,er40  ,erea 

era 

db 

cr, if, 'Null  Error  ?v',a 

erl 

lb 

cr, if , 'Dele ted  Record  :',0 

er2 

db 

cr,lf,'CRC  Error  :',a 

er3 

db 

cr, if, 'Data  Overrun-Onierrun  :',a 

er4 

d  b 

cr, If, 'Sees  Error  : ' ,  t’ 

er5 

equ 

era 

er6 

equ 

era 

er? 

equ 

era 

era 

db 

cr, if , 'Address  Error  :',0 

er9 

db 

cr  If, 'Write  Protect  :',a 

era 

do 

cr,lf,'ID  CRC  Error  :',e 

erB 

d  b 

cr, if, 'Write  Error  :',0 

erC 

db 

cr, If , 'Sector  Not  Found  :',0 

erD 

equ 

era 

erE 

db 

cr,if,'No  Address  Mars  :',0 

erF 

do 

cr, if, 'Data  Mars  Error  :',e 

eria 

equ 

er3 

er20 

equ 

er9 

erta 

equ 

erB 
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erbtf  ac  cr, if, 'Drive  Not  Ready  :',0 

rtry_cr.t  lb  1  Jlisa  error  retry  counter 

{  System  Memory  Seement  Table 

segtable  db  1  {1  segments 

dw  t?a_se?  {1st  see  starts  after  BIOS 

dw  t pa~ien  {and  extends  to  VHUWt 

include  singles. iib  {read  in  disK  definitions 

loc_stK  rw  32  {  local  stactr  for  initialization 

sticbase  equ  offset  ? 

lastoff  equ  offset  $ 

tpa_sep  equ  (lastoff -t04(i0n+l5 )  /  16 

tpa'ien  equ  0Ft?0n  -  tpa_seg 

db  0  {fill  last  address  for  GENCMD 

•  VlWVVfVVVWVVVVVVVWVWWIWVWtfWWWVVVVVV 

;  »  * 

{*  Dummy  Data  Section  * 

;*  * 

dsee  it  {absolute  low  memory 

ore  0  {(interrupt  vectors) 

int0_offset  rw  1 

int0_seement  rw  1 

{  pad  to  system  call  vector 

rw  bdos_mt-l ) 

bios_offset  rw  1 

bdos  seement  rw  1 

END 


rtry_cnt  db  0  idisic  error  retry  counter 
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APPENDIX  t 


title  'Customized  3asic  I/O  System' 


*  * 

*  Tnis  Customized  SIDS  adapts  CP/M-86  to  * 

*  tfte  following  Hardware  '•oaf  ieuration  * 

*  Processor:  iSSC  8612  * 

Controller:  1SBC  202 

vemory  model:  8080 


Programmer:  tf.2.  Candaior 
Revisions  : 


W  V  >?  9  tf tf  «  #  *c f  <■<  JSCV  3*  V  K«  V  «« «W  W  «*  »  «S<  V  V  W  V  M  V  V  a*  *  V  W  W  M  W 


true 

false 

cr 

if 

max  retries 


eau 

-1 

equ 

not 

true 

equ 

01a 

{carriage  return 

eou 

0an 

•line  feed 

equ 

10 

{for  disc  i/o,  be 

W*t  V*  WWW  *V  «*  WV  V  WW 

*  * 

*  Loader_bios  is  true  if  assembling  tne  * 

v  LOADER  BIOS,  otnerwise  BIOS  is  for  tne  * 

*  CP'I.SYS  file.  * 

*  * 


L0ADER_BI0S 

EOU 

TRUE 

Dlos_int 

equ 

224  {reserved  BDOS  interrupt 

IF 

not 

ioader_bios 

’  i 
»  i 

oios_code 

equ 

1 

2b00  n 

ccp_of f set 

equ 

0000a 

bios  ofst 
; !  " 

equ 

0B06n  {BDOS  entry  point 

i 

1 

ENDIF 

{  not 

loader_oios 

IF 

load 

er_bios 

f  ^  ■“  "  “ 

•  1 
t  1 

bios  code 

equ 

1 

1 

1200h  {start  Of  LDBIOS 

ccp_of fset 

equ 

0003n  »t»ase  of  CPMLOADER 

blos_of st 

equ 

0406n  {stripped  BDOS  entry 
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.  t 
*  I 

i  “ 


f 

i 


ENDIF  » loader  Dios 


csts  equ  £dan  JI92P1  status  port 

cdata  equ  0d9n  {  "  data 

• 
t 

{ 

‘  V  V 

iv  INTEL  iSBC  2fc,'2  Disx  Controller  Ports  * 

•M  X 

J  vv  wsrwww  V  WW  W  «V«¥VV«  ww 


base 

equ 

2?9n 

rtype 

equ 

oase*l 

rby  te 

equ 

Dase+3 

reset 

eau 

base+7 

dsta  t 

equ 

case 

ilow 

eau 

base+1 

inign 

equ 

base+2 

cseg 

or? 

ccpoffset 

ccp : 

org 

dios_code 

V  « 

*  BIOS  Junp  Sector  for  Individual  Routines  * 

*  v 

WWW  vv  WVWWWtC&V  w  wait  *  *J*Ji**£)pV 


jnp  INIT 
jnp  WBOOT 
Jnp  CONST 
jmn  CONIN 
Jup  CONOUT 
Jno  LISTOUT 
J-np  PUNCH 
jnp  READER 
J tt p  HOME 
J-np  SELDSK 
J-np  SETTEE 
J-np  SETSEC 
J-np  33TDMA 
jnp  READ 
Jnp  WRITE 
Jnp  LISTST 


{Enter  fron  BOOT  ROM  or  LOADER 
{Arrive  nere  from  BDOS  nan  e 
{return  console  xeyooard  status 
{return  console  Keyboard  cnar 
{writs  cnar  to  console  device 
{write  c.oaracter  to  list  device 
{write  cnaracter  to  puncr.  ievi ~e 
{return  cnar  from  reader  device 
{move  to  trx  UV  on  cur  sei  drive 
{select  list  for  next  rd/write 
{set  tracx  for  next  rd/write 
{set  ^sector  for  next  rd/write 
{set 'offset  for  user  tuff  (DMA ) 
{read  a  129  byte  sector 
{write  a  128  byte  sector 
{return  list  status 
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jmp  SECTRAN 
jmo  SET DMAB 
Jtid  GETSEST 
jmp  GETI03F 
Imp  3  ETI 33F 


jxiate  iogicai->pnysicai  sector 
Jset  see  base  for  ouff  (DMA) 
Jreturn  offset  of  vem  Desc  Tacie 
jreturn  I/O  map  byte  (I03YTE) 
Jset  I/O  map  byte  (I03YTE) 


*  nc  *  sc  Jjc  $c  agcagc  *  *  ¥  W  V  *  *  *  V  V*  **  *  *  *f  *  V  *fi  W  *  W  W  W 

j,t  V 

*  1N1T  Entry  Point,  Differs  for  LDBIOS  anl  * 
758  BIOS,  accorlin^  to  "Loaier^Si os"  value  * 

V  V 

;?*  *?*?**:**  ************  *******  ***=*****  ************ 


I'J  IT : 


•  i 

*  i 


i 

i 


Jprint  sisnon  message  ana  initialize  naravare 
mov  ax,cs  jwe  enterea  witc  a  JMP?  so  use 

mov  ss,ax  JCS:  as  tne  initial  value  of  S 

mcv  is , ax  JDS : , 

mov  es,ax  Jand  SS: 


Juse  local  stacic  during  initialization 

mov  sp, offset  stiDase 

cld  Jset  forward  direction 


IF  not  loader  bios 


I 

I 

J  Tnis  is  a  BIOS  for  tne  CP!*. SYS  file. 

J  Setup  all  interrupt  vectors  in  low 
J  memory  to  address  trap 

pusn  is  Jsave  tne  DS  register 

mov  IOEYTE ,0  Jclear  I03YTS 

mov  ax.0 
mov  as, ax 

mov  es.ax  Jset  SS  and  DS  to  zero 

Jsetup  interrupt  0  to  adaress  trap  routine 
mov  int0_off set ,of f se t  int_trap 
mov  int0_see,mer.  t  ,C3 
mov  di,4 

mov  si ,0  Jtnen  propagate 

tov  cx,5l0  Jtrap  vector  to 

rep  movs  ax, ax  Jail  256  interrupts 

J3D0S  offset  to  proper  interrupt 

mov  Ddos_or fset , bdos_ofst 

pop  ds  Jrestore  tne  DS  register 

(additional  CP/M-S6  initialization) 

i 

i 


BNDIF  Jnot  loader  oios 


IF 


loaaer  bios 


{?ni$  is  a  BIOS  for  tne  LOADER 
puss  is  {save  data  segment 

mov  ax.it 

mov  is.ax  .point  to  segment  zero 

{3DDS  interrupt  offset 
wov  bios_of fset . blos_ofs t 

mov  bdos_segnent,CS  jbdos  interrupt  segment 
(additional  LOADER  initialization) 
non  ds  .restore  data  seemeat 


ENDIF  Jioaaer  Dios 


•nov  dx, offset  signon 

call  pms?  {print  si ?non  message 

nov  ci.fc?  .default  to  or  a:  on  coiastart 

J n p  ccp  .Jump  to  cold  start  entry  of  CC? 


VROOT:  jmp  ccp+6 


{direct  entry  to  CCP  at  command  level 


not  loader  Dies 


*  i 

int_trap: 

cli 


cii  JDlocK  interrupts 

mov  ax,cs 

nov  ds.ax  {get  our  data  segment 

mov  ox, offset  int_trp 
call  pmsg 

nit  {sards  top 


En ill F  {not  loader  bios 


*  * 

*  CP/1  Caaracter  I/O  Interface  routines  * 

V  V 

*  console  is  USaET  (iB2blA)  on  iSRC  B612  * 

*  at  ports  DB /DA  * 

W  WV  W9  ■*  vtf  W  S«  WV  VWJjt  i+tf  w  m  WV  KHIHIW  '■*  WWWtjttfi  V 


CONST:  {console  status 

in  al  ,csts 
and  ai,2 
Jz  const_ret 

or  ai,2bb  {return  non-zero  if  raa 

cons  t_ret: 

ret  {revr  data  availaele 
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smoiJF: 

ret 

;  Routine  to  get  ana  ec 
;  and  snift  It  to 

uconecno: 

call  CONIN 
pusn  ax 
mcv  citai 
call  CONOUT 
pop  ax 
cm  p  ai  ,  'a  ' 

,1  b  u ret , 
cmp  ai ,  ' z  ' 
ia  uret 


Jiobyte  not  implemented 

o  a  console  cnara~ter 
upper  case 

!?? t  a  console  cnaraoter 
?save  and 
* e c n o  to  console 
Jiess  tnan  'a'  is  oj 
Jgreater  tnan  'z'  is  o£ 


uret : 
OTS  9  i 


suo  al,'a'-'A'  Jeise  snitt  to  ~aps 
ret 


107  ai ,  [i iXJ  ;«s“t  next  cnar  from  message 

test  ai,ai 

) z  return  *if  zero  return 

mov  CL, AL 

call  CO NO UP  ; print  it 

inc  r.\ 


jnps  pmse'  *next  cnarccter  an  loop 

7  'S 

-  Disk  Input/Out  put  Routines  * 

rfi  * 


SELDSK : 

; select 

aisi  ^iven  fcy  register 

nil  sics 

eau 

2  jnumber  of  disKs  (up  to  lb) 

mov 

diss.cl 

Jsave  dis*  number 

T,  ov 

ox ,  MUUn. 

Jreadv  for  error  return 

emp 

cl , ndisKs 

Jn  beyond  max  lisxs? 

jnt 

return 

Jreturn  if  so 

mov 

cn ,  0 

;doubie(n) 

mov 

bx ,  cx 

5  b  x  =  r. 

mov 

Cl  ,4 

Jreadv  for  '‘IS 

sni 

bx  ,  cl 

;n  =  n  9  16 

TQV 

cx, offset  ipbase 

add 

bx ,  cx 

idptase  +  n  *  15 

return : 

re  t 

Jbx  =  .dpn 

HO^E : 

jTove  selected 

lisK  to  nome  Dosition  [1 

mov  io_com  .nomcom 
mov  tri.k? 
can  execute 
ret 


SETTR5:  Jset  trails:  allress  eiven  by  CL 
mov  trit.CL 
ret 


SETSEC:  iset  sector  number  eiven  by  ~i 
mov  sect, CL 
ret 


SECTRAN:  Jtranslate  sector  CX  usine  table  at 
mov  cn,tf 
mov  bx,cx 

TEST  DX.eO  ;is  THERE  A  SKStf? 

:z  nq_see/  ;lf  not,  set 


[dxj 
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NO  SKEW: 


add  bx,ax 
tov  bi , [bxj 
ret 

ADD  3X.1 
RET 


Mda  sector  to  tran  taDi  =  address 
;?et  iosicai  sector 


? ETdma :  ;set  DMA  offset  given  d.v  CX 
■nov  dma_adr,CX 
ret 

SETDMAB:  ;sst  DMA  segment  given  oy  CX 
mov  dma_se?.CX 
ret 

! 

G5TSEGT:  jreturn  aaaress  of  pnysical  memory  tame 

mov  bx, offset  se?_tatle 
ret 

•  VW  WWX?  V  WW  w  WW  Jjtsjt  W  W  WW  V 

;  *  w 

;*  Aii  disx  I/O  parameters  are  setup:  * 

;*  DISE  is  distc  numoer  (SELDSE)  * 

;*  THE  is  tractc  number  (SETTRK)  * 

; ^  SECT  is  sector  numoer  f  SETS EC )  * 

}*  10  ADR  IS  THE  PHYS  ADDR  FOR  DMA  * 

; *  DMA~ACR  is  tne  DMA  isc  offset  * 

;v  read  reads  tne  selected  sector  to  tne  DMA* 
i*  address,  and  rfRITB  writes  tne  lata  from  * 

; *  tne  DMA  address  to  tne  selected  sector  * 


READ: 


WRITE: 


mov  cl, 4 
mov  al.diss 
sal  al,ci 
or  ai.rdcode 
mov  io_com, ai 
jmps  execute 

mov  cl, 4 
mov  al.diss 
sal  ai.cl 
or  al,wrcode 
mov  io_com,al 


EXECUTE: 
outer_retry : 


Jcombine  disi  selection 
;  w  i  t  n  opcode 

fcreate  iopb 


Jcreate  iopb  for  write 


ret™ : 


rov  rt  ry  ~nt ,ma x_ret ri es 


in  ai.rtype  Jclear  controller 

in  al.rfiyte  » 

can  sendcom 

idle:  in  al.istat  Jwait  for  completion 

and  ai,4  Jready 

jz  idle 

;  cnecic  i.o.  completion  osc 

in  ai.rtype 

;  Otfuniinxei  i/o  complete  01  United  1/0  co^p 

;  10  lisle  status  cnanged  11  (not  usei) 

J  must  fie  a  00  in  al 

test  alfi0b  Jready  status  cnange? 

JNZ  WREAD7 
OR  AL.0 

jnz  werror  .some  otner  error,  retry 

;  cnees  i/o  error  bits 

in  al.rfiyte 
rcl  ai.l 

mov  err_coae,S0n 

Jb  wready  Junit  not  ready 

rcr  ai.l 

mov  err  coae.al 

and  ai.kjfeh  Jany  otner  errors? 

jnz  werror 
J 

;  read  or  write  is  o.t,  al  contains  0 

ret 

wready:  Jnot  ready,  treat  as  an  error  for  now 
in  al.rfiyte  Jciear  result  byte 

Jmps  trycount 

werror:  .return  naraware  malfunction 
tryooun  t: 

dec  rtry_cnt 
jnz  retry 
mov  al,err_code 
mov  a n , 0 

mov  bx, ax  .mate  error  code  15  cits 

mov  ox  ,  errt  fil  [HXJ 

call  pmse  .print  appropriate  message 

in  ai.cdata  Ji'lusn  usart  receiver  buffer 

call  uconecno  Jreaa  upper  case  console  cnaracter 

emp  al ,  'C  ' 

je  wcoot_i  .'cancel 


?0 


WVfWV*  VW  V  W  W  WV  W  W*  VV?¥¥ 


V  V 

v  sendcom  sends  tne  address  of  tne  iopfc  to  * 

*  t&e  IS  BC  202  w 

v  * 


^VK’WiW’WW’iCW  W  W  W  W  W  W  W  WW>W  W*CW>W  WKqciWW 


senacom : 

MOV  CL, 4 
MOV  AX, DMA  S£G 
SAL  AX, CL 
ADD  AX, DMA  ADR 
M07  10  ADRTaX 
MOV  CL, 4 
MOV  AX , CS 
SAL  AX, CL 

ADD  AX,  OFFSET  CHAN  CM  D  {  ADD  SEC  S.  OFFSET  FOR  20  2 

out  ilow.ai 

mov  cl,B 

sar  ax, '-I 

out  inie-n.ai 

ret 


W=W  W  w  qcw&w  TfjfW  qt&W  wzrwwwjf 

*  V 

*  Data  Areas  v 

7*  ** 


data_of 

fset 

dse? 

equ 

offset  s 

o  re 

lata 

_offset  ;  contiguous  witn 

IOBYTS 

db 

0 

disn 

db 

0 

?liss  number 

cnancnd 

d  b 

90n 

rlopb  cnannei  word 

i0_C0m 

db 

0 

nsec 

db 

1 

{number  sectors  to  xfer 

trie 

db 

0 

sec  t 

db 

0 

{start  sector 
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iij^ayilMdii^AniiiSiiiLi  i  daSKBEM 


10  ADR 

t*ez^H 

;?HYS  ADDS  FOR  SBC20Z  USB 

dna  adr 

dw 

0080n 

»L‘MA  adr  (oerauit) 

ira_seff 

Iw 

0 

;DMA  Base  Segment 

HOM  COM 

SQ'J 

•x 

?.DC5dD 

SCO 

4 

ERR  COE 

£  DB 

eoK 

VRCODE 

BCJ 

5 

I? 

loader 

_oio  s 

f  ■-1  — —  —  — — 

.  1 
>  \ 

si^non 

db 

cr ,  lr , 

1 

1 

c  r ,  i  f 

•  » 

>  i 

dc 

'CP/M- 

BS  Version  l.0',cr,if  ,0 

1 

J 

SNDIF  Jioader  bios 


IF 

not  loaler_bios 

J  "  "l  " ' 
•  ! 

*  1 

si^non 

d  b 

cr ,if ,cr,if 

■lb 

'System  Generated  05/25/Sl 

•  i 
» i 

a  b 

c  r ,  l  f ,  '£ 

BNDI 

F  Jnot  loaier_bios 

int  tro 

lb 

or  ,  if 

d  b 

'Interrupt  Trap  Halt' 

db 

cr.if  ,0 

errt  bl 

iw  9 

r0 , erl ,er2 , er3 

dw  9 

r4,er5 ,erb  ,er7 

dw  9 

rE ,ery ,erA,er3 

dw  e 

rC ,erD  ,er£ ,  erF 

aw  9 

rl  4?  ,er20  ,er40  ,erfc0 

era 

db 

cr, if,  'Null  Error  ?v',0 

erl 

db 

cr, if , 'Eeie tel  Record  : ' ,  0 

er2 

db 

cr  ,  if  ,  'CRC  Error  :  ' ,  '& 

er2 

d  b 

cr,lf,'Data  Overrun-Unie rrun  : 

er4 

db 

cr, if, 'Seen  Error  :',0 

er5 

S4U 

era 

erb 

eau 

erO 

er? 

equ 

era 

erb 

db 

cr , if  ,  'Address  Error  :',0 

er^ 

do 

cr,lf,'tfrite  Protect  :',0 

erA 

lb 

cr,if,'ID  CRC  Error  :',0 

er3 

d  b 

cr, if, 'Write  Error  :',0 

erC 

lb 

cr. If , 'Sector  Not  Found  : ' , 0 
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erD 

equ 

e:^ 

erZ 

i  c 

cr,  it¬ 

,  'i'.e  Aon  res  s  Ma  r.-c 

ca  r  F 

do 

er,  if 

, 'Data  yarx  Error 

erlZ 

equ 

er3 

°r22) 

equ 

e  r9 

a  r 

equ 

erD 

er’sZ 

a  d 

cr ,  if 

, 'Drive  Mot  Ready 

rtry_.cn  t  4c  0  Miss  error  retry  counter 

»  System  yenory  Segment  Tacie 

segta Die  id  l  jl  segments 

4w  tpa_se?  .'1st  se?  starts  after  SI'S 

dw  tpa“ien  ;ana  extends  to 

INCLUDE  DOUBLE. LIB  ;  READ  IN  DISK  DEFINITIONS 

ioc_stx  rw  32  » local  stacx  tor  initialization 

stxoase  equ  offset  3 

lastoff  eau  offset  3 

tpa_?e?  equ  ( iastof  f+0400n+l5)  /  16 

tpa~ien  equ  Zr'ZUa  -  tpa_seg 

4d  a  »fiii  last  address  tor  GENCMD 

;  v  ‘.i 

i  *  Eummy  Data  Section  * 

;  v  v 

J  Vi*»*»**¥***<HiiiMW**WV¥*W**mi»WV*W*«¥**«MM¥ 


dse<? 

2 

iaosolute  low  memory 

org 

0 

;  (interrupt  vectors) 

intZ 

_of  fset 

rw 

1 

intZ 

_sefirment 

rw 

1 

5 

pad  to 

system  can  vector 

rw 

2* ( odos 

_lnt-i ) 

DlOS 

_o  f  f  s  e  t 

rw 

1 

DdOS 

segment 

rw 

1 

END 

rtry^cnt  do  z  Jdistc  error  retry  counter 
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ft 

n 


PPSuDIT. 


n 


ROM  bootstrap  for  CP/^-rfc  or.  ar.  iSFCrbi/12 
w  i  t  n  t  a  e 

i5.BC  221  A  222  Floppy  DiSi  Controllers 


f  Copyri?nt  (C)  1962,1961 

;  Digital  F.esearcn,  Inc. 

;  Box  579,  Pacific  Ore  ve 

*  California,  93952 

■  &V  WW  ***************************  WVWi****** 

;*  Tnis  Is  tne  FOOT  ROM  wnicn  is  resident  * 
;*  in  tne  957  monitor.  To  execute  tne  Doot  * 
;*  tne  nonitor  must  tie  brougnt  on-line  and  * 
i*  tnen  control  passed  by  tne  eonnand  * 

;  *  "etf  d4:2"  .  First,  tne  ROM  moves  5:8 

;*  a  copy  of  its  data  area  to  RAV  at  icca-  * 
;*  tion  22222 E,  tnen  initializes  tne  segment* 
;*  registers  and  tne  stacs  pointer.  Tne  * 
»*  various  peripneral  interface  cnips  on  tne* 
;*  3FC  86/12  are  initialized.  Tne  6251  * 

;*  serial  interface  is  configured  for  a  3604* 
;*  baud  asynenronous  terminal,  and  tne  in-  * 
;*  terrunt  controller  is  setup  for  inter-  * 
;*  rupts  10E-17H  (vectors  at  22240K-2225FH)  * 
;*  and  edge-triggered  auto-SOI  (end  of  in-  * 
;*  terrupt)  "ode  witn  ail  interrupt  levels  * 
;*  na  Siced-or  f  .  Next,  tne  221-222  Diskette  * 
;*  controller  is  initialized,  and  traci  0  * 

»*  sector  1  is  read  to  determine  tne  target  * 
;*  paragrapn  address  for  LOADER.  Finally,  * 
>*  tne  LOADER  on  tracs  2  sectors  2-25  and  * 
»*  tracK  1  sectors  1-2S  is  read  into  tne  * 
;*  target  address.  Control  tnen  transfers  * 
to  LOADER.  ROM  * 

; *  2  contains  tne  even  memory  locations,  and* 
;*  ROM  1  contains  tne  odd  addresses.  BOOT  * 
;*  ROM  uses  RAM  between  22222H  and  222FFK  * 
; *  (absolute)  for  a  scratcn  area ,  aion?  witn* 
;*  tne  sector  l  buffer.  * 

j  ************************* ****** ******* 

cr  equ  Id 

if  equ  12 

;  aisle  ports  and  commands 
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base 

ecu 

0'^‘rn 

rtype 

equ 

case*! 

r  byte 

equ 

oase+3 

reset 

eq  u 

tase-7 

9 

ista  t 

equ 

base 

ilow 

equ 

base+1 

ini  pn 

equ 

base+2 

f 

Jactual  console 

baud 

rate 

oaui_ra  te 

equ 

9600 

Jvaiue  for  -253 

baud 

counter 

baud 

equ 

758/  (  baud_ra  te/100 ) 

9 

csts 

euu 

ZDAn 

» 1 6251  status  port 

data 

equ 

zrsn 

;  "  data  port 

9 

tca0 

equ 

0  E  0  n 

•6253  PIC  cnannel  0  port 

tcnl 

equ 

ten 0+2 

Jen  1  port 

tcn2 

equ 

tcn0+4 

Jen  2  port 

tcmd 

• 

equ 

tcn0+6 

J8253  command  port 

icpl 

equ 

0C  0  ft 

J 8259a  port  0 

icp2 

• 

equ 

0C2ft 

J 8259a  port  1 

9 

secsec 

• 

eau 

ZcBft 

•offset  for  traei  1 

t 

RD'ISSG 

• 

* 

• 

SOU 

0FFD4H 

9 

• 

9 

c  SP? 

5 

romsee 

JFirst,  move  our  data  area  into  RAF'  at  0000:0200 


» 


» 


mov  ax.cs 

mov  ds.ax  Jpoint  ES  to  CS  for  source 

mcv  SI  .drotnoegin  Jstart  of  data 

rrov  DI, offset  ram_start  Joffset  of  destination 
■nov  ax,Z 

mov  es.ax  Jdestination  segment  is  0000 

nov  CX,data_len*tn  Jfto*  mucft  to  move  in  nytes 

rep  movs  ai,ai  ;nove  out  of  eprom  a  tyte 

•  at  a  time 


mov  ax,0 

mov  ds,ax  Jdata  segment  no*  in  RA,M 

mov  ss.ax 

mov  sp, staox_of fset  Jlnitiaiize  stacK  segment/ 

Jpolnter 

•clear  tne  direction  fiae 


^5 


cid 


Setup  tne  6259  Progra-nmaoie  Interrupt  Controller 


f 


'no  v 

ai ,  13  n 

out 

icpl tai 

»y259e  ICW  i  e0b6  mode 

110V 

al , 10n 

out 

icp2,al 

Jb259a  ICW  2  vector  (A  40— 5 F 

•nov 

ai , lFn 

out 

icp2,ai 

{ 52 59a  ICW  4  auto  £01  Tiaster 

710  V 

al ,  0FFn 

• 

out 

icp2,ai 

{52 59a  OCV  1  mas.<  an  levels  off 

f 

; Reset 

• 

and  initialize 

tne  '021/202  Diskette  Interface 

f 

restart 

• 

• 

*  also 

come  oact  nere  on  fatal  errors 

i  n 

al , rtype 

•clear  status  type  resister 

in  al.royte 

{clear  status  register 

out 

reset  f a  l 

•  reset  diskette  system 

nomer : 

710  V 

EX,  offset 

no  me 

CALL 

execute 

;no7ie  drive  0 

J 

"10  V 

ox, OFFSET 

sectorl  {offset  for  first  sector 

D^A 

nov 

ax ,  ox 

{eater  in  pactet 

mcv 

ox ,  offset 

read0+5  ;  t 

710  V 

l ox] ,al 

• 

inc 

ox 

710  V 

[ox]  ,an 

{pactet  now  con-piete 

710  V 

ox , offset 

read0  {pacxet  location 

call 

execute 

{semi  pacicet 

I 

nov 

es , aos 

•  segment  loc  for  LOADER 

710  V 

ax.es 

{must  translate  to  16  Dit 

a  os 

Tiov 

cl, 04 

{addr  for  distetta  controller 

sal 

ax ,  cl 

nov 

Ox , offset 

readl+5 

710V 

[ox  J ,al 

•enter  in  packet 

i  nr 

OX 

710  V 

[ox ] , an 

710V 

tx , offset 

readl 

. 

cal  1 

execute 

{ read  tract  0 

t 

710V 

cl  ,04 

,710  V 

ax ,  es 

{compute  offset  for  tract 

1 

add 

ax , secsec 

sal 

ax,  cl 

710V 

ex ,  offset 

read2+£ 

710  V 

lex] ,al 

inc 

OX 

710  V 

[ox J  ,an 

7*0  V 

ox, of fset 

reaa2 
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i 


conout : 


c  o  n  i  n : 


enter  LOAEilE 

jmpf  iword  ptr  ieap_o!‘?S9 1 

•riov  cl,  [bll 
test  cl, cl 
jz  return 
call  conout 
Inc  ET 
jrp  pms# 


In  ai.csts 
test  al  ,1 
jz  conout 
■70V  al,cl 
out  cdata.al 
ret 


In  ai.csts 
test  al  ,2 
jz  conin 
in  al.cdata 
and  ai,7Fn 
ret 


execute : 
retry: 

in  ai.rtype 
in  al.royte 
call  sendcon 
idle:  in  ai.dstat 

and  al,4 
Jz  idle 
in  ai.rtype 
test  al,2 
Jz  intcmp 
JVP  P.ETR1 


;re*  •  it'  ^.-ive  not  ready 
Jclear  controller 


♦system  status 

♦  system  awaiting  mterupt 

fcneci  drive  status 


;I/C  NOT  COMFIITi’ .  THY  AC-A1 N 
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i  r.  t  r  m  p 


S  t  A  7.  U  S 


:  in  a  1 ,  r  oy  t  e 
--I  =1,1 
jae  iocno 
RCR  a!  ,  1 
Jrp  ratal 
iorrp:  r°r  al ,  1 

ana  ai,Kfen 
Jz  return 
JVF  PETRI 


fatal: 

m  o  v  c  i  ,  '£ 

/rsST:  P.CR  AL,  1 
i nr  cl 
TEST  AL.21 
jz  ftest 
mcv  ai,ci 
n  o  v  a  r. ,  fc“ 

A Dr  AX, A X 
•nov  ft, ax 
-cv  cx,errtDi[EX] 
;  print  apnropriate 

call  p-o$g 
rail  ~ o  ni n 
pop  ax 
j •’ip  restart 

f 

return : 

o  E? 


; i c  is  ccrpiete  *  e  t 


;  re  s  to  re 
; a r.y  errors  V 


j  ratal  =rror 


J.ucice  15  cits 

error  message 

fwait  for  xey  stride 
Jdiscara  unused  ite^ 
,'tr.en  start  all  ever 

;  return  rror  EXEP'JTI 


seulcom: 

mov 

out 

mov 

sar 

out 

ret 


routine  to 

ax ,  Cx 
ilow,ai 
ci,es 
ax ,  cl 
inign  ,al 


send  a  corcrand  strin?  to  ~L'l/,£i 


Jpacicet  addr 


;  Image  of  data  to  ce  moved  to  Ra^ 

f 

iromoeein  eau  ort'set  $ 

f 

* 
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re  a  lb  t  ri  s? 


> 

cread  tr*0 


1  0 

erS?  a 

Jparaxeter  oiock  ic~w 

1  c 

4n 

» read  function  cone  for  drive 

i  b 

1 

sectors  tc  reaa 

1  b 

6 

J  trail  ft 

a  d 

1 

Jstart  witn  sector  1 

1  0 

0 

Jwiii  contain  lower  byte  aidr 

id 

0 

>  "  upper 

a  o 

a  t 

b0n 

41 

{real  xu 1 t i pie 

d  C 

2t 

sectors  to  read 

1  D 

z 

; t  racK  2 

db 

t  start  *  i  t  n  2 

i  b 

0 

Jaaar  for  tracic  2  ?oes  nere 

d  b 

Z 

i 

creaitrii 

d  b 

b0r. 

d  b 

4  a 

1  b 

25  {sectors 

d  b 

1  ftracs  ft 

db 

1  Jstart  witn 

1  b 

z  Jaaar  iso 

• 

j 

a  b 

0  jaadrxsc 

?  r.oxee 

lb 

ben 

DE 

03  H 

i  b 

0 

lb 

0 

d  b 

0 

d  b 

db 

i 

cerrtDi 

dw 

offset 

er  0 

iw 

offset 

erl 

dw 

offset 

er'E 

dw 

offset 

er3 

Iw 

o  r  r  s  e  t 

op  4 

dw 

offset 

9r5 

lw 

offset 

ers 

dw 

offset 

er7 

Cer0 

db 

cr ,  if , 

'Nun  Error  V7',0 

Carl 

db 

c  r ,  l  f , 

'CRC  Error', 0 

Cer2 

db 

cr , if , 

'Sees  Error', 0 

Cer3 

db 

cr ,  if , 

'Address  Error', 0 

Cer4 

db 

cr  ,if. 

'Data  Overrun-Underrun 

Cer5 

d  b 

cr ,  if , 

'ante  Protect', e 

Cert» 

db 

cr.if , 

'Write  Error', 0 

Cer7 

• 

d  b 

cr,if , 

'Drive  Not  Ready', 0 

I 

droxend 

enu 

offset  $ 

sector 


1 


7y 


e a 


eju  lrorrenl-droroesrin 


lata  1  e  n  ?  t  n 


f 

;  reserve  space  i n  Rav  for  aata  area 

*  (no  net  records  venerated  Here) 


» 

dse? 

z 

or? 

Z2ZZn 

* 

ram_start 

9qu 

S 

read£ 

r  o 

7 

;  read 

tra"tc  Z  sector  l 

readl 

r  e 

7 

*  read 

T£  Sa-26 

read2 

r  d 

7 

* react 

T1  Si -26 

none 

rb 

7 

» none 

drive  Z 

errt  ol 

TV 

£ 

era 

r  c 

lengtn 

cerz 

*16 

erl 

ro 

1  e  n  e  t  ft 

cerl 

era 

re 

ien?itn 

cera 

er3 

r  d 

lengtr. 

cer3 

eri 

ro 

lenetn 

c  e  r4 

;i4 

er5 

r  6 

lengtn 

cerb 

;  n 

erb 

ro 

lengtn 

cerb 

as 

er? 

• 

r  b 

ienstn 

cer? 

;i7 

f 

leap_cf fset 

TV 

1 

leap'seement 

t 

TV 

1 

• 

1 

TV 

3a 

» local 

stactc 

stacn:_off  set 

• 

f 

equ 

offset 

$*stacic 

from  nere  d o *n 

T£  51  read  in  nere 


secto  rl 

equ 

offset  $ 

I 

Ty 

rb 

1 

Len 

TV 

1 

ADS 

TV 

1 

JA3S  is  all  ve  car°  about 

Min 

TV 

1 

vax 

TV 

end 

1 

B0 
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APPENDIX  D 


tide  'b/c*  Diss  I/O  Drivers' 

•  V*I*M  V  V  V  *i*  •!»*»*  V  *»»*»*  ^  V  '(*  V  'I*  W  V  V  V  V  V  •»»  V  V  •»*  W  WW  Vv  *»•  V  'r  V 

*  * 
;*  Sasic  Input /Output  System  (Bios'  for 

;*  CP/'I-Bd  Configured  for  iSBC  cd/lii  witn  :: 

tne  iSSC  Floppy  Diss  Controller  * 

•  xf  ~ 

;  *  (Note:  tnis  file  contains  ootr.  emceoiec.  -! 
;*  tans  and  oianss  to  minimize  tne  list  file  * 
; *  widtn  for  printing  purposes,  You  nay  »is n 
; *  tc  expand  tne  oiar.ss  cefore  performing  * 

-na  jor  edi  tin*.  )  * 

;  Copyrignt  (C)  iy6'«?,lddi 

>  Digital  Ressarcr,  Inc. 

;  Bor  57 9,  Pacific  Drove 

;  California,  y2m.ifc: 

;  (Permission  is  nereoy  granted  to  use 

;  or  aostract  tne  following  program  in 

;  tne  irplerrectat  ion  of  C?//,  Kp/^  or 

;  CP/N2T  for  tne  d2d5  or  d£“d  Mlcro- 

;  processor) 


aqu  -1 

equ  not  true 


•  ».« v  V  •?  V  V  V  V  V  *f  V  V  v  *f  V  V  v  V  V  *«'  V  V  V  •»*  V  v  *i*  *»*  V  v  v  *f  V  V  »|5  »,t »,»  »,» »,» if  if 

•  *  is 

;*  Doaier_ti  os  is  true  if  assembling  tne  * 
LOADS?.  BIOS,  ctaerwise  BIOS  is  for  tne 
;*  CP'dSFS  file.  Slc_iist  is  true  if  *e  * 

;  *  nave  a  serial  printer  attacnel  to  2LCd52d  1:5 
»*  Edos_int  is  interrupt  used  for  earner  * 

;*  versions.  * 

•  *  ~ 

J  W9VWV:i*'?V9V'i'W'rWJ?VWisVV;i'VW*itvii{vV  1  if  if  if  »,«  «!«  i|5  V 

ioader_oios  equ  false 

c i c_i 1st  equ  true 

oics_int  equ  freserved  BDCS  Interrupt 

IF  not  loader  oios 


I 


I 


r 


Dios_-'Oi° 
ccp_o :'  f  set 

51  os_c:'st 
•  1  “ 
f  ; 

eau 

cqu 

equ 

25  yzr. 

*.  ic  <  t  n 

0P0S.C  ;  51-OS  er. T  ry  point 

t 

1 

2N  El  F 

;  not 

loader_Dios 

I? 

1 0  a  i  e  r  _  d  i  0  s 

•  1 

1  1 

oics_code 
c  c  p  _o  f  r  s  e  t 
r  d  o  s  of  si 

•  t 
f  } 

5*4  U 
?QU 

equ 

1 

I2et*n  ;  start  of  LE3ICS 
lV23n  *  case  of  CpyiOAEiR 
04/6n  jstriopea  PECS  entrv 

1 

ENEIF 

; loaaer_bios 

cs  ts 

cda  la 

equ 

equ 

SJD A. n  ;  1=251  status  pert 
t'Dfcn  ;  "  lata  port 

• 

t—t 

**: 

Dle_ 

list 

t 

•  1 
» 1 

lsts 

11a  ta 

pic  reset 

•  1 

9  1 

equ 

equ 

equ 

1 

1 

41n  ?2o5l  i'Jo.  0  on  BLCB53B 

•1  ••  ••  «•  •• 

4?n  ; 

sen  ; reset  selected  rJSA?.TS 

1 

1 

ENDIF 

;  tic 

_li  s  t 

lata  oc 


W  WVWVWVVV  a?  V  W*?  V  >?  w  W  V  MV  V  V  W  V  V  V  V  ^  ^  *  a,;  a,c 

*  Intel  1SBC  224  Diss  Controller  Ports  * 

*jt  ;,: 

M  V  V  M qe >gt  JpM  V  M  V  V  V  ^  a*:?  a*  *  W 39c  7  jgcxcM  *  M 39c  V  ***  ;jc*s  a*  9  jjc  V  agcjgc aQC  rjt  VV  V 


nase204 

equ 

0a0n 

JSHC204  assigned  address 

f lc_co^ 

equ 

Das “224+0 

;  b27 1 

FDC  out  command 

fic_stat 

equ 

case'204+0 

5  9271 

in  status 

f  lc_parm 

equ 

oase204+l 

5B271 

cut  parameter 

flc_rsl t 

equ 

oase204+l 

5  B27 1 

in  result 

f ic_rst 

equ 

Dase204+2 

JB271 

out  reset 

lTiac_alr 

equ 

Dase204+4 

5  8257 

EMA  Dase  address  out 

a'r,ac_cont 

equ 

Dase204+5 

*  B2S7 

out  control 

lmac_scan 

equ 

oa  s  e204 +S 

JB257 

out  scan  control 

iTac~salr 

equ 

oase204+7 

?  8257 

out  scan  address 

2flac_-node 

equ 

Dase204+fc 

5S257 

out  mode 

i+ac_stat 

equ 

oase204+B 

5  9257 

in  status 

• : c  _sel 

equ 

Das “204+9 

5  EEC 

select  port  (not  used 

r  1  c_se<'’ient 

equ 

Dase204+10 

iseement  address  register 

92 


n.  *-.  o 


rese  t_204 

eq.u  oase2^4+ib 

J reset  entire  interface 

nax_ret  ri es 

e  a  u  12 

Jmax  retries  on  a  is  k  i/o 
; oefore  perm  error 

cr 

equ  4? Id 

{carriage  return 

if 

e q u  2a n 

Jiine  feel 

cseg 

o  re 

ccpoff set 

ccp : 

o  r? 

o i os  _coie 

*c  *  *  *  a?  *  *c  2?  *t  9  9  *t 

9  V 

v  BIOS  J unp  7ector  for  Individual  Routines  * 

V  V 

*cjjt  vwv  *****  vw?«¥  v  ww  w 


Jnp  INIT 
j  up  WEOOT 
jnp  CONST 
jmp  CONIN 
jnp  CONOUT 
jnp  LISTOUT 
jnp  PUNCH 
jnp  READER 
jnp  HOMS 
jnp  SSLDSK 
jnp  SETTRE. 
jnp  S  STS  EC 
jnp  SETDMA 
jnp  READ 
jnp  WRITS 
jnp  LISTST 
jnp  SSCTRAN 
jnp  SETDMAE 
jnp  GETS EGT 
jnp  GETIOBJ 
jnp  SSTIOBF 


J Enter  from  BOOT  ROM  or  LOADER 
{Arrive  nere  from  BDCS  call  e 
Jreturn  console  KeyDoard  status 
Jreturn  console  steyDoarl  cnar 
{write  cnar  to  console  device 
Write  cnaracter  to  list  device 
Write  cnaracter  to  puncr.  levice 
Jreturn  cnar  fron  reaper  levice 
Jnove  to  trx  «5«d  on  cur  sei  drive 
Jseiect  distc  for  next  ri/write 
Jset  tractr  for  next  ra/write 
Jset  sector  for  next  rd/write 
Jset  offset  for  user  ouff  (DMA) 
Jread  a  12e  cyte  sector 
Jwrite  a  12b  Dyte  sector 
Jreturn  list  status 
Jxiate  n fi cai->pny si cai  sector 
Jset  seg  Dase  for  ouff  (DMA) 
Jreturn  offset  of  Mem  Desc  Taoie 
Jreturn  I/O  nap  tvte  (lOtYTE) 
Jset  I/O  nap  cyte  (IOBTTE) 


w*3*jjcajs  W  V 

*  INIT  Entry  Point,  Differs  for  LDEIOS  am  * 

*  BIOS,  according  to  ”Loader_Bios"  value  ’* 

V  3? 

V  WWW  W  VW  W  VW  VWMWWW  WV  WWW  V 


INIT: 


Jprint  si 
nov  ax,cs 
mov  ss,ax 
nov  ds,ax 


?non  message  and  initialize  nar 
Jwe  entered  wltn  a  JMPE 
J  CS:  as  tne  initial  value 
J  DS  : , 


c  f 


ss 


HL5 


pov  es,ax  ;  ana  ES : 

»us=  local  stacic  during  initialization 
710  v  sp,  offset  stioase 

ell  i3»t  forward  direction 

IF  not  ioader_tios 

»  " 

•  I 

*  I 


I 

;  Tnis  is  a  BIOS  for  tne  CPb'.SYS  fixe. 
;  Setup  all  interrupt  vectors  in  low 
i  T?ifo:y  to  address  trap 


pusn  as  Jsave  tne  DS  register 

■>  o  v  a  x  ,  4" 

Tiov  as, ax 

i'ov  es,ax  ;set  ES  anc  1)S  to  zero 

> setup  interrupt  £  to  address  trap  routine 
mov  inti0_of  f  set ,  of  f  set  mt_trap 
mov  intfe!_sesment,CS 
mov  di,4 

nov  si, 45  itnen  propagate 

mov  cx,5145  .trap  vector  to 

rep  rovs  ax, ax  Jail  HP?  interrupts 

JBDOS  offset  to  proper  interrupt 

mov  bdos_off se t , oios_of st 

pop  ds  Ires  tore  tne  CS  register 

*  5*  S*  *  V  5JC  *6  -*?  ^  2?  rfi  3?  JJC  J*  *  X?  3?  3?  *  3*  3?  3.C  3?  Xfi  Xfi  *jt  if  Tfi,  *  3*  3Jt  3*  3*3*  3*  3*  3*  3*  3*  X,  Z  3* 


i* 

National 

••  _  .  <* 
BLC  b'53b 

Cnannel  2  for  a 

serial* 

;* 

96245 

Gaud 

printer  - 

tnis  Doard  uses 

b  Siv-- 

;v 

netics  25 

51  'Jsarts 

wnic.n  nave  or-cnip  tauaii! 

;  * 
;* 

rate 

venerators  . 

j  '■*  ¥'(*  V 

v  *i*  'r 

•i*  V  T  T  *r  'r  v  V  S*  "i*  V*l*  'i*  *»*  »i*  ».»  *i» 

mov 

al , eFFn 

out 

oi c  reset, 

al  Jreset  an  usarts  or.  =f33e 

TCV 

al , 4En 

out 

iiata+2,al 

»set  usart  <  i  r. 

asyr.o  b  oit  -T,o 

u  6 

mov 

ai ,  3En 

out 

Ida  ta+2  ,al 

»’ s e t  usart  «  tc 

9  54545  Daud 

mov 

ai .37n 

•  t 

*  1 

out 

liata*3  ,ai 

;enaoie  Tx/'Rx, 

and  set  m  F.TS, 

j 

LTF 

»  * 

SNDIF  ;not  ioader_bios 

IF 

loader 

Dios 

f  “ 
•  I 
»  I 


J 

I 


{Tms  is  a  BIOS  for  tne  LOALiR 
pusr.  is  ; s a v e  data  seenen t 

V  O  V  a  X  ,  vi 


t c v  as, ax  {point  tc  segment  zero 

{EUCS  interrupt  offset 
i3v  cio s_of f se t , bio s_of s t 

tov  bios_segmer.t  ,CS  {bios  interrupt  sex  rent 


.  1 
*  1 

pop 

is 

{restore  lata 

1 

1  1  " 

SNEi 

F  > ioader_cios 

•no  v 

bx, of f set 

signon 

call 

pm  se 

{print  sienon 

message 

no  v 

ci  ,  <£ 

» aet’aui t  tear 

A:  on  coicstart 

jPD 

CCD 

{jump  to  cold 

start  entry  of  CC? 

rfb  JOT : 

Jfip 

ccp+5 

.direct  entry 

to  CC?  at  command  level 

IF 

not  ioader_Dios 

n  — 

<-• 

c* 

►t 

an: 

I 

cl  i 

iDlocK  interrupts 

mov 

ax,  cs 

mcv 

cs ,  ax 

{get  our  lata 

segment 

m  o  v 

bx .offset 

int_trp 

caii 

pmsg 

J ! 

nit 

{.narcs  top 

l 

1 

ENDIS’  ;not  loaner  Dios 


1,1V  VW  WWW  V9V  WW*tt>tWVWW& &WW9W  WV 

*  V 

*  C P /M  Cnaracter  I/O  Interface  Routines  v 

v  Console  is  Usart  (iB25la)  on  iSBC  H'6/IB  ,f 

*  at  ports  DB/DA  * 

V  '  * 

WW  MW  1*9  9  WW-t  W  MW***W*  *#¥***¥* 


COMST 


const 


{console  status 
in  al.csts 
and  al,2 
jz  const_ret 

or  ai,25S  iretum  non-zero  if  RBa 

ret: 

ret  {Receiver  Data  Available 


CONIN : 


{console  input 


BP 


call  const 


jz  CONIN 
in  ai,caata 
ani  ai,7fn 
ret 

;«*ait  for  HI  A 

;reai  data  ana  remove  parity  oit 

CCNOUT:  ;consoie 

in  ai.csts 
ani  al,l 
jz  CON CUT 
rev  al,cl 
cut  ciata.al 
ret 

output 

;aet  '-onsole  status 
»‘*ait  for  TBH 

JTransmi tte r  Buffer  inoty 
;tnen  return  data 

LISTOUT: 

;iist  nevicp  output 

IF  Olc_iiSt 

f  ^  B  "  11  ‘  1  J  1  “ 

•  j 

call  USTST 
j2  LISTOUT 
nov  al,cl 
out  llata,ai 

•  i 
t  i 

1 

1 

;*ait  for  printer  not  busy 

Jsend  cnar  to  TI  Slrf 

i 

* 

1 

ENPIF  ; olc_list 

ret 

LISTST : 

Jpcii  list  status 

• 

— 

cr 

*- 

O 

1 

H— 

H- 

Ul 

** 

t  ... 

•  1 
>  1 

in  al.lsts 
ani  ai,9ln 
cTip  ai,81a 
jnz  zero  ret 
or  ai ,255 

•  f 

9  1 

J 

1 

/'loos  at  Dotn  TxRIi  ana  CTF. 

feitner  false,  printer  is  ousy 
;ootn  true,  IPT  is  ready 

l 

1 

2NCI F  iolc  list 


re  t 

PUNCH:  5not  implement ea  in  inis  configuration 
HSAJJKR: 

nov  ai,lan 

ret  Jreturn  30F  for  now 

GFTIOBF : 

irov  ai,tf  ; T T Y :  for  consistency 


ret  ;  1 0E1T5  not  ixplexented 

S2TI03?: 

ret  Jiofiyte  not  ixplenentei 


zero_ret : 

and  al,0 

ret 

; re  turn  zero  in 

AL  ana  flags 

»  Routine  to  <?st 

nd 

ecno  a  console  cna 

racter 

a  n  d  s  n  i  f  r 

!  t 

to  upper  case 

uconecno : 

call  CONI  N 
pusn  ax 
to v  cl , al 
call  CONOrjT 
pop  ax 
ctp  al ,  'a  ' 
j  t  uret 
CTp  al ,  'z  ' 

J  a  u  re  t 

su  d  ai ,  'a '-'a ' 

ure  t : 

ret 

;  utility  subroutine  to  print  messages 

pxsg: 

tov  al,(BXj  net  next  cnar  from  message 

test  al,ai 

j z  return  »if  zero  return 

t  o  v  C  L ,  AL 

call  CONQUT  ;?r in t  it 

inc  BX 

jxps  pxss>  ;next  cndracter  and  loop 

;  *  v 

i*  risfc  Input/Output  Routines  * 

j  J(C  rf. 

SSLDSn  Jseiect  diss  ?iven  by  reeister  CI 

rnov  fix ,  i3fe5  fcJ  ton 

c^p  cl  , 2  Jtnis  BIOS  only  supports  2 

jnD  return  ireturn  *  /  0000  in  £X  if  ca 

tov  al,  90n 

CTp  cl , 0 

Jne  sell  jirlve  l  if  not  zero 

tov  al,  40a  jelse  drive  is  0 


Is’et  a  console  cnaracter 

;save  and 

,’ecno  to  console 

ness  taan  'a'  is  ox 

greater  tnan  'z'  is  ok 
•else  snift  to  caps 
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(■1  n 


sell:  mov  sel_masic,al  isave  drive  select  r^asK 

hovi  we  need  diss  Daraneter  address 

mov  cn,0 

mov  bx.cx  i3X  =  won  (CL) 

mov  cl, 4 

snl  dx  ,  cl  imuitipiy  drive  code  v  16 

i^reate  offset  from  Disi  Parameter  .Base 
add  tx, offset  dp_oase 

return : 

ret 

HOMS:  imove  selected  diss  to  nome  position  (Traci  2) 

mov  trS,0  iset  list  i/o  to  tracx  2ero 

mov  bx, offset  nom_com 
call  execute 

jz  return  inome  drive  and  return  if  OK 

mov  dx, offset  bai^nom  ielse  print 
call  pmsg  ;~Home  Error" 

jmps  nome  {and  retry 

SSTTRK:  iset  tracK  address  given  by  Cl 

mov  trtc,ci  ;we  only  use  B  bits  of  tracit  address 

ret 

SETSEC:  iset  sector  number  given  tv  cx 

mov  sect, cl  iwe  only  use  9  bits  of  sector  address 

ret 

SECTRAN:  {translate 
mov  bx,cx 
add  bx,dx 
mov  bl ,  [oxj 
re  t 

SETDMA:  iset  DMA  offset  given  by  CX 
mov  dna_adr,CX 
ret 

SSTDMAB:  iset  DMA  segment  given  oy  CX 
mov  dma  see.CX 
ret 

♦ 

GETSEGT:  ireturn  address  of  physical  memory  table 
mov  tx, offset  seg_tatie 
ret 

•  vttmvmwm  ******  wvwmwm**  wwvw  wwv*  wwi'w 
;  rf  * 

; ^  All  dist  I/O  parameters  are  setup:  the  * 
i*  Read  and  rfrite  entry  points  transfer  one  * 

;*  sector  of  123  bytes  to/from  tne  current  * 


sector  CX  using  table  at  [DXj 

iadd  sector  to  tran  table  address 
iget  logical  sector 
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9  D'U  address  using  tne  current  disic  drive  9 


3£AD: 

mov  ai,i2n  {basic  read  sector  command 

Jnps  r_i*r_common 

.<RIT2: 

mov  ai,2an  {basic  write  sector  command 

r_w_com*non: 

mov  Ox, offset  io_com  {point  to  command  string 
mov  cyte  ptr  l[£X.j,ai  {put  command  into  stride 
»  fail  into  execute  and  return 

execute:  {execute  command  stride. 

I [BX]  points  to  lengtn, 

«  followed  by  Command  byte, 

{  followed  by  ienetn-1  parameter  bytes 

mov  iast_com,3X  {save  command  address  for  retries 
outer_retry : 

{allow  some  retrying 
mov  rtry_cnt ,max_retries 

retry: 

mov  £X,iast_com 

call  ser.l_co.rn  {transmit  command  to  iB2vi 
i  rnecK  status  poll 

mov  BXflast_com 
mov  al,l[oxJ 
mov  c x ,  1'H 45 fc. h 
cmp  ai,2cn 
Jb  exec_poli 
mov  c x.Bi'Ben 
and  ai,4Jfn 
cmp  ai,0cn 
mov  al,£ 
ja  axec_exit 

exec_poll : 

in  ai,fdc_stat 
and  al,cn” 
xor  ai.cl 
jz  exec_poli 


in  al,fdc_rslt 
and  ai,len 


{get  command  op  code. 

{mass  if  it  will  be  "int  req" 

;otc  if  it  is  an  interrupt  type., 

{else  we  use  "not  command  busy” 

{unless  tne re  isn't 

»  any  result 

{poll  for  bits  in  CH, 

{  toeeied  witn  Dits  in  CL 

{read  status 

{  isolate  wnat  we  want  to  poll 
{and  loop  until  it  is  done 

{Operation  complete, 

»  see  if  result  cole  indicates  error 


Jz  exec_exit  Jr.c  error,  tner.  exit 

ibOfa  type  of  error  occurred  .  .  . 

cnp  ai ,  l/n 

je  ir_nrly  !was  it  a  not  ready  ririve  ? 

{ r.o , 

ar_ra.y:  ;  tnen  we  just  retry  real  or  write 
dec  rtry_cut 

Jnz  retry  {  up  to  lit  tires 

J  retries  io  not  re cover  rror  tne 

;  r.ara  error 

r  o  v  a  h ,  i? 

t’ov  cx,ax  {maice  error  coae  16  cits 

Tiov  bx,errtbi[2Xj 

''all  prs?  {print  appropriate  ressa<?° 

in  ai,cdata  >  f  1  u s n  usart  receiver  buffer 
call  uconecno  {read  upper  case  console  cr.sracter 
c t p  al , 'C  ' 

je  wt>oot_l  {cancel 

cmp  al , 'H ' 

Je  outer  retry  { retry  1L'  re  re  tires 
cmp  al ,  T' 

je  z_ret  {ignore  error 

or  al,255  {set  code  for  perranent  error 

sxec_ex i z : 

ret 

dr_nrdy:  {rare  to  wait  for  drive  ready 

call  test_ready 

jnz  retry  {if  it's  ready  now  we  are  done 

call  test_ready 

jnz  retry  {if  not  ready  twice  in  "ow, 

rov  Dx.offsgt  nrdymsg 

call  pmse  {  Drive  Not  Heady’ 

nrlytf 1 : 

call  test_ready 

jz  nrdy01  {now  loop  until  drive  ready 

jmps  retry  Jtnen  go  retry  witnout  decrement 

zre  t : 

and  a  1  *  it 

ret  {return  witn  no  error  code 

wboot_i:  {can't  maice  it  w/  a  snort  leap 

j Tip  WBOOT 

J  WW WW V 

;  v  v 

i *  The  16271  reauires  a  read  status  command  * 

to  reset  a  arive-not-reaay  after  tne  * 

urive  becomes  ready  v 


;  v  v 

•  WJf  VW*  WWVWW&St&VW&WWWWVW  WWW  v-v^m  w 


tes  t_reaay : 

mov  dn,  4££r.  jproper  mass  i:  lr  1 

test  sei_mas£,Stfn 
jnz  r.rly2 

’"Ov  Id,  £4r  J^asic  for  lr  0  status  bit 

nrly2 : 

Tiov  ox, offset  rds_ccm 
rail  send  com 

dr_poli: 

in  al,fdc_stat  Jget  status  word 
test  al  ,50* 

jnz  dr_poii  iwait  for  not  command  cusy 

in  ai,fdc_rslt  i=?et  "special  result" 
test  al  ,in  Jlooic  at  oit  for  tnis  irive 

ret  ireturn  status  of  ready 

J  *  =«c 

;*  Send_con  sends  a  command  and  oarameters  * 
to  tae  18271:  M  addresses  parameters.  w 

;*  Tae  DMA  controller  is  also  initialized  * 

;*  if  tnis  is  a  read  or  write  * 

•  tf  V 

;  ** ***** ************:*»£*  jss*******,!*  *;;::*!*;* 

send_com: 

in  al,fdc_stat 

test  al ,Sen  Jinsure  command  not  busy 
jnz  senl_com  jioop  until  ready 

»see  if  we  nave  to  initialize  for  a  DMA  operation 

iov  ai,l[bxj  »?et  command  byte 
cmp  al,i2n 

jne  write_maybe  »if  not  a  read  it  could  re  write 
mov  ci,40n 

jmps  init_dma  *is  a  read  command,  go  set  DMA 
wrl te_may be: 

cmp  ai,4Jaa 

Jne  dma_exit  jieave  DMA  alone  if  not  read  or  writp 
mov  cl,fc2n  Jwe  nave  write,  not  real 

init_dma: 

;we  nave  a  read  or  write  operation,  setup  DMA  controller 
,*  (CL  contains  proper  direction  bit' 

mov  al,{?4n 

out  dmac_mole ,ai  tenable  dmac 
mov  ai,0tJ 

out  dmac_ccnt,ai  Jsend  first  oyte  to  control  port 
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mov 

out 

al ,  ci 

imac_ccnt ,ai 

•  load 

direction  register 

TO  V 

out 

ax , dma  _air 
!mac_alr  ,a  1 

» s  end 

low  oyte  of 

P^A 

mov 

out 

al ,  an 

dmac_adr ,a 1 

*  send 

nign  oyte 

rnov 

out 

ax,lma_see 
flc_seement ,ai 

•  send 

low  oyte  of 

segmen  t 

mov 

out 

ai ,  an 

fic  segment ,al 

>  men 

nien  seemp^t 

address 

dna  exit: 


mov  ci ,  [BXJ 
i  no  El 
mov  ai ,  [3X  J 
or  al,sei_masic 
out  fdc_com,al 
parm_loop: 

dec  ci 


; ge t  count 

•  get  command 

Jmerge  command  and  drive  cone 

•  send  command  byte 


Jz  exec_exit 
Inc  i'X 
parm_poll : 

in  al,fdc  stat 
test  al,2en 
jnz  parm_poil 
mov  al , [£XJ 
out  fic_parm,ai 
jmps  parm_ioop 


•  no  (more)  parameters,  return 
•point  to  (next)  parameter 


•test  "parameter  register  full"  tit 
•‘idle  until  parm  reg  rot  full 

•send  next  parameter 

•go  see  if  tnere  are  more  parameters 


J  >)t  » 

; *  Data  Areas  * 

i 

'4  •  fy«99f999V9999W9999*999f999999«99999999«99r¥ 

data_offset  equ  offset  5 

dse? 

org  data_offset  fcontiguous  witn  code  segment 


IF 

ioader_oios 

1 

•  1 
t  l 

signon 

do 

cr,if ,cr,if 

•  i 
t  ( 

• 

db 

'CF/V-E6  Version  2 .2 ' , cr • if 

\ 

1 

» 

ENDIF 

» loader_oio  s 

IF 

not  ioader_0ios 

? 

•  i 

♦  i 

sietion 

d  o 

1 

\ 

cr*if * cr*  if 

d'd 


do  '  System  Deneratsc  -  11  Jar.  El ',cr,  if  ,0 


SNDIF  »nct  loader  bios 


cad_nom 

d  c 

cr. if, 'Home  Error'. cr, if  ,2 

ir.t_trp 

db 

cr , if ,' Interrupt  Trap  Halt'.er, 

errt  ol 

dw 

era , erl ,er2 , er3 

dw 

er4,er5,er6,er? 

dw 

e  rS , ery ,erA ,  er3 

dw 

e  rC , erD ,erE , erF 

era 

d  b 

cr, if, 'Null  Error  Tl',2 

erl 

equ 

er0 

er2 

equ 

era 

er3 

equ 

era 

er4 

db 

cr,lf,'ClocK  Error  :',0 

erb 

dt 

cr,  if, 'late  :',2 

er5 

d  b 

cr,if,'ID  CRC  Error  :',0 

er7 

ib 

cr, if, 'Data  CRC  Error  :',0 

erb 

db 

cr,  if, 'Drive  Not  Ready  :',0 

ery 

db 

cr, if, 'Write  Protect  :',0 

era, 

do 

cr,  if, 'Trsc  22  Not  Found  :',IS 

er3 

dt 

cr, if , 'Write  Fault  :',0 

erC 

db 

cr , if , 'Sector  Not  Found 

erC 

eau 

era 

erfi 

equ 

era 

erF 

eau 

era 

nrdymse 

equ 

erb 

rtry_cnt 

-  db 

a  Jdisi  error  retry  counter 

1  as  t~com 

dw 

a  Jaidress  of  last  command  striae- 

dma_adr 

dw 

a  Jama  offset  stored  nere 

dma^seg 

dw 

a  »dm.a  segment  stored  nere 

sel "mas* 

db 

40 h  Jseiact  mass,  40 n  or  ban 

;  Various  command  strings  for  13271 

1  o_com  10  3  ?  lenfl't!’- 

rd~wr  db  0  ; real/write  function  code 

tri  db  A  ?tract  * 

sect  db  0  fsector  » 

nom_com  do  2,29n,0  Jno-ne  drive  command 

rds_com  db  l,2cn  fread  status  command 

»  System  Memory  Seement  Table 

segtable  db  2  i2  segments 

dw  tpa_se»  »lst  see  starts  after  3IDS 
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dw  tpa_ien 
dw  200k3n 
lw  2VV0n 


;acd  extends  to  fe'irk’fc'i. 

Jsecond  is  20000  - 
;  3FFFF  ( lidfcK ' 

include  sickles. lie  jread  in  aisic  definition 

1 0 c _s t k  tv  32  Jiocal  stacic  for  initialization 
sttcoase  equ  offset  5 

lastoff  equ  offset  $ 

tDa_se?  eau  ( 1  ast  of  f  +04i5idr.-*-l5  )  /  lb 

tpa“ien  equ  0300a  -  tpa_se? 

an  0  .fill  last  address  for  SS 

j  9999* ***** *************************** 

;  *  V 

;*  Durrmy  Data  Section  * 

j  *  m 

■  W  WW  W  W  WV  W9W1WV  W  WV  W  WWW  WW>W>?  WW>it 

dseg  0  Jaosoiute  low  memory 

or?  0  »(interrupt  vectors) 

int<J_offset  rw  1 

int2~segment  rw  1 

;  pad  to  system  call  vector 

rw  2*( bdos_int-l } 

cdos_offset  rw  1 

t)ios  segment  rw  1 

SND 
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